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-REM ¢ 


PRODUCT CODE: MAINDEC-11-DZDHN-B 


PRODUCT NAME: OH11 DATA RELIABILITY TESTS 7” SINGLE LINE 


ECHO AND PATTERNS/CABLE TESTS 
DATE: 21-SEPTEMBER-1976 
AUTHOR: E. CROWLEY 
MAINTAINED BY: DIAGNOSTIC ENGINEERING 


COPYRIGHT (C) 1976 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS. 


curs SOFTWARE IS FURNISHED UNDER A LICENSE FOR USE ONLY ON A 

INGLE COMPUTER SYSTEM AND MAY BE COPIED ONLY WITH THE 
INCLUSION OF THE ABOVE sda = ih NOTICE. THIS SOFTWARE, OR 
ANY OTHER COPIES THEREOF NOT BE PROVIDED OR OTHERWISE 
MADE AVAILABLE TO ANY OTHER PE ERSON EXCEPT FOR USE ON SUCH 
SYSTEM AND TO ONE WHO AGREES TO THESE LICENSE TERMS. TITLE 
1 fee. OWNERSHIP OF THE SOFTWARE SHALL AT ALL TIMES REMAIN 


THE INFORMATION 4 THIS DOCUMENT IS SUBJECT TO CHANGE 
WITHOUT NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT 
BY DIGITAL EQUIPMENT CORPORATION. 


DEC ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF 
ITS SOFTWARE IN EGUIPMENT WHICH IS NOT SUPPLIED BY DEC. 
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GENERAL PROGRAM DESCRIPTION 


“MD-11-DZDHN” IS A GENERAL PURPOSE TEST AND EXERCISER 
PROGRAM FOR THE DH11, 16. LINE py" HRONOUS _ ee te 
IT CONSISTS OF THREE INDEPENDENT SUB-PROGRAMS THAT MAY BE 
USED FOR ACCEPTANCE TESTING, INSTALLATION CHECKOUT, AND 
CORRECTIVE MAINTENANCE OF THE DH11 SUB-SYSTEM. 


SUBPROGRAM 1 DH11 DATA RELIABILITY TESTS 


ONCE CONFIGURED BY THE AUTOSIZER OR BY INITIAL CONSOLE DIALOGUE 
THIS PROGRAM CAN TEST UP TO 16. DH11’S. ALL LINES ON EACH DH11 ARE 
TESTED gone AT A TIME) WITH ALL COMBINATIONS OF ine abe RAMETERS 
(BAUD RATE. CHAR LENGTH, PARITY Er. ) BY TRANSMITT 
EIVING A "Brmaee COUNT PATTERN. ALL ERRORS DETECTED AE are REPORTED 
Device AS THEY “ ocktR AND ALSO LOGGED IN ERROR 

orarieTicn TABLES. AT THE COMPLETION OF TESTING FOR EACH DHI11 

SE ERROR STATISTICS TABLES ARE DUMPED ON THE CONSOLE DEVICE 


ERROR STATISTICS PROVIDED. THIS SUB-PROGRAM IS NORMALLY 
SELECTED FOR OVERALL DH CHECKOUT. 


SUB-PROGRAM 2 DH11 SINGLE LINE ECHO TEST 


THIS PROGRAM PROVIDES THE MEANS OF TESTING ANY LINE ON 
ANY DH11 BY USING AN ASYNCHRONOUS bee gy DEVICE (VTSO,LA36 ETC) 
CONNECTED TO THE LINE UNDER TEST. THIS wa WOULD NORMALLY 
BE SELECTED WHEN A PROBLEM IS TSOLATED TO A SPECIFIC LINE. 
IT HAS TWO MODES OF OPERATION, SBND MODE OR ECHO MODE: 


SEND MODE: THE USER TYPES AN ASCIZ BUFFER IN ON 
THE CONSOLE DEVICE AND THEN TYPES A 
UNIQUE CONTROL CHARACTER TO SEND THIS 
BUFFER TO THE DH11 TEST TERMINAL. 


THE USER CAN THEN COMPARE THE TWO IMAGES 
FOR ACCURACY OF TRANSMISSION. 


ECHO MODE: THE USER TYPES IN ON THE DH11 TEST TERMINAL 
AND ED BEING 


WILL ECHO THE a BUFFER TYPED IN 
UP TO THAT POINT 


SEQ 0004 


1.1.3 


GO1 


SUBPROGRAM 3 DH11 DATA PATTERNS/CABLE TESTS 


HIS PRO IDES _T 
Ott et AN H31S5 TEST CONNECTOR TO TERMINATE THE 
Tne UNDER 7 7 THE USER CAN SPECIFY BUFFER alge AND LINE 
BARAMET OR TO SELECTING ONE OF THE FOLL 
DATA PATTERNS FOR TRANSMISSION, RECEPTION, BND MERROR CHECKING: 


. ALTERNATING 1/0 PATTERN 

- BINARY UP COUNT PATTERN 

- BINARY DOWN COUNT PATTERN 

- RANDOM DATA PATTERN 

‘ ce TENE SEQUENCE se THRU (D) 


INGLE CHARACTER PATT 
TYPED IN BUFFER PATTERN 


ALL ERRORS DETECTED ARE REPORTED AS THEY OCCUR AND A SWITCH 
REGISTER OPTION ALLOWS LOCKING ON A PARTICULAR PATTERN. THIS 
SUB-PROGRAM WOULD NORMALLY BE SELECTED FOR TROUBLESHOOTING 

A SPECIFIC PROBLEM. 
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MD-11-DZDHN CORE MEMORY MAP 
KE ESKEKKSEA KEL KA KKL RHEL E ELAR ELLE ES 
oos000: ¥ 
: VECTOR AREA : 
SHELA LRA KL HRHAA RHEL AREA ARH EAA LHERE 
% % 
+ STACK AREA : 

% 

SKKKLHHA KALA LARA KA RHA AAA EAHKEKEE 
001100: * $ 
* SYSMAC CONSTANTS * 
: AND VARIABLES - 
—— RERARAKAKRA KARR AAA RARER AERA LARK KAAS 
BEGIN: + 
START-UP CODE : 
LKSXAAHKA LEAK LELHRAA HRA LHL HA AEKKKE 
STDOHIL: * 
DH11 DATA RELIABILITY 
* TESTS “ 


ECHO: 
* DH11 SINGLE LINE s 
: ECHO TESTS ; 
SHALL LL LALLA LA LE LALA A ASL H A HLLKEE 
EXPAT: #* + 
% DH11 SINGLE LINE % 
; PATTERNS/CABLE TESTS . 
KALKRHLLLL LALA LA KALA LALEL HHL HE REESE 
SEOP: * a 
% STANDARD SYSMAC % 
. UTILITY ROUTINES : 
KLKKKLLEL LALLA ALL RL LAL KA ALLE KA KELE 
CKRST1: # + 
% COMMON DH11 UTILITIES : 
ene neat canst eee tae 
DHADR: # 
a DH11 PROGRAM CONSTANTS : 
: AND VARIABLES : 
SKREKZLLELE LLL ALAR AL ALLELE LEKEKE 
% x 
HELELEKLE HXLEKKLEE 
* CONT. * * CONT. * 
EELLEEEEE HEKEKLEEE 


% ¥ 
RLRALLLLALAKAL ALLA LALLA RELA LE LALES 
% % 


HO 1 


SE@ OO06 


SHREXLKEE REKHHRKKE 
* CONT. * % CONT. # 
HHKKKZKLE HHKKKLEKE 
& % 
EM) - \eeuenieeeaasiaaseemeecmere aie 
a 2 SYSMAC ERROR MESSAGE % 
+ BUFFERS % 
s % 
SHA KSKRA LALA AL HELE KAKA KAA FARAH ALKLE 
TITLE: # « 
+ DH11 MISCELLANEOUS % 
: MESSAGE BUFFERS : 
KRELEALEKEKAL AERA LRA L AL HA HKALE KRLELE 
RBUF : ¥ + 
* TRANSMIT AND RECEIVE ¥* 
% DATA BUFFERS x 


ENBUFS: 


% % 
HAL KKALLRLEL ALLL ALLER ERLE RERLELES 


I01 
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SYSTEM REQUIREMENTS 


_ A. ANY POP11 ie HA au WITH 12K OF CORE_MEMORY 


AND A CONSOLE EVICE (VTSO,LA36 ETC) 


NOTE: FOR PAPER TAPE SYSTEMS USING THE POP11 
ABSOLUTE LOADER THE PROGRAM WILL LOAD AND RUN 
IN 8K OF CORE 


B. A DH11 16. LINE ASYNCHRONOUS SERIAL LINE MULTIPLEXOR 
C. A DH11 TERMINAL DEVICE (LA36,VTSO ETC.) [ECHO TESTS ONLY] 


D. TEST CONNECTORS AND MODULE (THE NO. OF EACH REQUIRED 
IS DETERMINED BY THE PARTICULAR TEST APPLICATION. 
REFER TO SECTION 6.1 A COMPLETE DISCUSSION OF THE 
MAINTENANCE CONNECTORS. ) 


1. H31S TEST CONNECTOR 
2. H8611 TEST CONNECTOR 
3. M974 TEST MODULE 


SOFTWARE REQUIREMENTS 


A. ACT11/ THE PROGRAM CONTAINS THE NECESSARY “SOFTWARE HOOKS” 
APT11. FOR INTERFACING TO THE ACT11/ gfe MANUFACTURING 
SYSTEMS. THE PROGRAM CAN BE RUN AS PART 
OF A QUICK VERIFY “CHAIN” SINCE IT CONTAINS 
AN AUT Eee tan 
B. XXDF THE PROGRAM MAY BE LOADED FROM ANY “XxDP" 


MEDIA. IF AUT OLSTA RTED BY THE “XXDP" MONITOR 
CONTROL WILL BE TRANSFERRED TO THE DATA REL- 
IABILITY PROGRAM. 


RELATED DOCUMENTS AND STANDARDS 


A. DH11-O0 ENGINEERING DRAWINGS 

B. DH11 MANUAL EK-DH11-MM-O02 

C. PDP11 PERIPHERALS Bh 

D. PDP11 PROCESSOR HANDBOOK 

E. MD-11-DZQAC-C1 SYSHAC. SL 

F. MD-11-DZQXA “XXDP” USER’S GUIDE 

G. DIAGNOSTIC ENGINEERING STANL«RDS AND CONVENTIONS 
PROGRAMMING PRACTICES DOC NO. 175-003-009-00 


DIAGNOSTIC HIERARCHY PREREQUISITES 


MD-11-DZDHN ASSUMES THAT THE FOLLOWING DIAGNOSTICS 
OTE CRED. RUN PRIOR TO ITS EXECUTION AND THAT NO ERRORS WERE 
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B: Hb-1f-beonN Oel1 Basie DIAGNOSTIC 


FAILURE ASSUMPTIONS 


OOOHM THe ASSUMES THAT THE DH1i HARDWARE VERIFIED 
fe ee ZDHM, THE BASIC DH11 DIAGNOSTIC, IS FUNCTIONING 


OPERATING INSTRUCTIONS 


A. PAPER TAPE SYSTEMS 


USE_THE STANDARD PDP11 ABSOLUTE LOADER PROCEDURE FOR 
LOADING PAPER TAPES. AFTER LOADING THE PROGRAM MUST BE MAN- 
UALLY STARTED. (REFER TO SECTION 2.1.2) 


B. “XXDP" SYSTEMS (REFER TO “XXDP” USER’S GUIDE MD-11-DZQxA) 
MOUNT _T (DECTAPE, DISK ETC) 

SS Ti PERPOPRGTE DERI ESTEE BE 

‘ ONCE LORDED ieTOR R PRINTS AN INTRO- 
DUCTORY VESSAGE AND ND. RESPONDS. WITH A” 
TYPE: “DZDHNB” FOLLOWED BY EITHER A <CR> 


CARRIAGE RETURN OR AN “ALTMODE™ 
TO LOAD THE PROGRAM. 


IF A <CR> WAS TYPED THE USER MUST MANUALLY 
START THE PROGRAM AFTER LOADING. 


IF_ AN “ALTMODE” WAS TYPED THE MONITOR WILL 
AUTO START THE PROGRAM AT LOCATION O000200(8) 
WHICH WILL PeeiN EXECUTION OF THE DATA REL- 
IABILITY PROGRAM 


“_ wu 


NOTE: . WHENEVER THE DH11 CONFIGURATION IS CHANGED 
: THE DIAGNOSTIC SHOULD BE RELOADED. 


SEG 0009 
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STARTING PROCEDURES 


E— ARE FIVE DIFFERENT STARTING ADDRESSES FOR THIS 


SACLE Ae 


SUB-PROGRAM 1 DH11 DATA RELIABILITY TESTS 


CREE EEE EEE EEE EEE EE EE EEE EEE EEE EEE EE EEE EEEEF 


A. TQ AUTOMATICALLY START THE PROGRAM USING THE AUTOSIZER 
(START AT LOC 000200(8)) 


MfWwM 


6. SE 
7 


. INSTALL THE REQUIRED TEST CONNECTORS FOR THE 


PARTICULAR TEST APPLICATION yu TO SECTION 6.1) 
SET THE eee, SWITCH TO H 


. 200 
. DEPRES ADDRESS 
. SET THE SR (WORST CASE TESTING) 


SET THE SR=000002 (TO TYPE THE DEVICE MAP) 

SET THE SR=000000 (QUICK PASS) 

SET THE SR=000400 (HALT AFTER PARAMETER SET-UP) 
T THE HALT/ENABLE SWITCH TO ENABLE 


- DEPRESS START - THE PROGRAM WILL TEST ALL LINES 


B. TO TYPE 


ON ALL DH’S FOUND 
IN ALL REQUIRED PARAMETERS (START AT LOCATION 000200(‘8)) 


- INSTALL THE REQUIRED TEST CONNECTORS FOR THE 


PARTICULAR TEST APPLICATION. (REFER TO SECTION 6.1) 
SET THE pi aA SWITCH TO HALT 


L ADDRESS 
SET THE SR=000001 (FOR INPUT DIALOGUE) 


- SET THE OO, | ZENHOLE SWITCH TO ENABLE 
. ag STAR 


THE PROGRAM ILL PRINT THE TITLE AND ASK FOR THE 
+ by OF ADDRESSES BETWEEN VECTORS. TYPE EITHER 
"10" OR A “20" TO INDICATE TEN OR TWENTY ADDRESS 
OISPLACERENT BETWEEN VECTORS FOLLOWED BY A <CR> 
(CARRIAGE RETURN). 


NOTE: 1. SYSTEMS WHERE THE DM11-BB VECTORS 
ARE yee WITH THE DH11 VECTORS 
HAVE 20(8) ADDRESSES BETWEEN VECTORS. 
(THI THe ASE FOR THe 50 th FRONT po) 
2. STAN SY HAVE T 1 VECTOR 
CONTIGUOUS _™ A 10(8) ADDRESS 
DISPLACEMENT 


- THE PROGRAM WILL ASK FOR THE DEVICE ADDRESS NEXT. 


TYPE IN THE ADDRESS (OCTAL) OF AL FIRST DH11 
IN THE SYSTEM FOLLOWED BY A <C 


SEG 0010 


IF AN TNVAL TO. pODRES? S TYPED THE PROGRAM 
WILL TYPE AN E MESSAGE AND ASK YOU TJ 
TRY AGAIN. 


* ibe PURPA GELYoR RobREs® ‘toLTALY"o PORES Frrsr 


IF AN INVALID VECTOR ADDRESS IS TYPED THE 
PROGRAM WILL TYPE AN ERROR MESSAGE AND ASK 
YOU TO TRY AGAIN. 


10. BaRAe ER: PERE TN AR Geel Ro! EnCoMEB Ad OLLOnS: 


BITOO=1 TEST DH11 #00 
BITO1l=1 TEST DH11 #01 
BITO@=0 DO NOT TEST DH11 #02 


BIT1S=1 TEST DH11 #15 


EXAMPLES: 

177777<CR> TEST ALL 16. DH11’S 
100000<CR> TEST ONLY DH11 #17(8) 
000005<CR> TEST DH11 #00 AND O2 


11. NEXT THE PROGRAM WILL ASK FOR THE LINE SELECTION 
i at TYPE AN ENCODED OCTAL NO. AS 


BITOO=1 TEST LINE #00 
BITOl=1 TEST LINE #01 
BITO2=0 DO NOT TEST LINE #02 


BIT1S=1 TEST LINE #15 


EXAMPLES: 

177777<CR> TEST ALL 16. LINES 
100000<CR> TEST LINE 17(8) ONLY 
000005<CR> TEST LINES 00 AND Ce 


IF _A <CR> RETURN ONLY IS TYPED THE PROGRAM WILL 
DEFAULT TO 16. LINES. 


RLKRALRAKEKE 
N 
RLLELALEARE 


IF MORE THAN ONE DH11 IS TESTED THE SAME COMBINATION 
OF LINES WILL BE TESTED ON ALL DH11"S SELECTED. 


le. IF SR@=0 THE PROGRAM WILL BEGIN EXECUTION TESTING 
THE FIRST ae LINE OF THE FIRST SELECTED DH11. 
i eokra;” PARA 2.4, 3.0, AND 4.0 FOR ERROR AND STATUS 


SEG 0011 


13. IF SR8=1 THE PROGRAM WILL HALT AND TYPE THE FOLLOW- 


C. DEFAULT 


No 


x 


D. CHANGE 


OCW 


wo ono 


. DEPRESS START 
PROGRAM 


ING MESSAGE: 
“DEPRESS CONTINUE TO START TESTING” 


ONTIN | shone THE PROGRAM WILL BEGIN TEST- 


WHEN 
ING AS INS 
THE PURPOSE OF THIS HALT IS TO ALLOW DUMPING 


UPDATED VERSIONS OF THE PROGRAM AFTER THE PARAMETERS 
HAVE BEEN SET UP FOR THE PARTICULAR DH11 SYSTEM. 


PARAMETERS *# (START AT LOC 000204(8)) 


. INSTALL THE REQUIRED Teet CONNECTORS FOR THE 
PARTICULAR TEST APPLICATION. REFER TO SECION 6.1. 


SET THE SE OneTITe) SWITCH TO HALT 


: SET THE SR=000204( 
. DEPRESS LOAD ADDRESS 


R 
SET THE SR=000200 (WORST CASE TESTING) 
SET THE SR=000000 (QUICK PASS) 
SET THE HALT/ENABLE SWITCH TO ENABLE 


; DEPRESS START 


IF THIS IS THE INITIAL LOAD 
THE DEFAULT PARAMETERS ASSUME ONE DH11 
WITH THE FOLLOWING ADDRESS ASSIGNMENTS 


DH11 #0 DEVADR=760020, VECTOR=330, BRS 


OTHERWISE, THE PROGRAM WILL DEFAULT TO THE 
PARAMETERS USED IN THE PREVIOUS EXECUTION. 


PROGRAM EXECUTION BEGINS. REFER TO SECTIONS 2.4, 3.0, 


AND 4.0 FOR EXECUTION TIMES, ERROR REPORTS, AND’ 
PROGRESS REPORTS. 


DEVICE AND LINE SELECT PARAMETERS (START AT, LOC 000210(8)) 


- INSTALL THE REQUIRED TEST CONNECTORS FOR THE 
SPECIFIC TEST APPLICATION. (REFER TO SECTION 6.1) 


SET THE HALT/ENABLE SWITCH TO THE HALT POSITION 
SET THE SR=000210 
DEPRESS LOAD ADDRESS 


. SET THE SR=000200 (WORST CASE TESTING) 


SET THE SR=000000 (QUICK PASS) 
SET THE SR=O000400 (HALT AFTER PARAMETER SETUP) 
SET THE HALT/ENABLE SWITCH TO ENABLE 

ASK FOR DEVICE SELECTION PARAMETER 
eee GCEED fs TN (B-10) ABOVE. 


WILL ASK FOR LINE SELECTION PARAMETERS. 
PROCEED AS IN (B-11) ABOVE. 


SEG 0012 


* 10. PROGRAM WILL BEGIN EXECUTION AS DESCRIBED IN 
PARA 2.1.2.1 (B,12) ABOVE 


SEG 0013 
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2.1.2.2 SUBPROGRAM 2 DH11 SINGLE LINE ECHO TESTS 


; CONNECT THE TEST TERMINAL TO THE DH11 LINE TO BE TESTED 

4 Set THE SL SWITCH TO HALT 

. DEPRESS L 
SET 


OAD. ADDRESS 
HE SR=000001 (TO INHIBIT THE AUTOSIZER) 
NOTE: THE AUTOSIZER IS NOT INHIBITED 
THAT IS, SR=000000, IT WILL LOAD THE FIRST 
DH CSR ADDRESS AND’ VECTOR FOUND AND TEST THAT 
DEVICE ONLY. IF ANY OTHER DH’S ARE to i TESTED, 
iad CSR at AND VECTOR MUST BE INP 
Ri IS, WITH SR=000001. 

NABLE SW’ TO ENABLE 


THe PRO E PROGR HLL T THE TITLE MESSAGES 
ADDRESSES BETWEEN VECTORS. 


TYPE AETTHER Q i OR “20” AS DESCRIBED IN PARA 2.1.2.1 (B7) ABOVE. 
. hg 3 mn THE DEVICE ADDRESS (IN OCTAL) FOLLOWED 


iF <CR> ONLY I Vee THE PROGRAM WILL USE 
A DEFAULT RUDRESS 760020(8) 


IF AN INVALID ADDRESS IS TYPED THE PROGRAM 
WILL_RESPOND WITH AN ERROR MESSAGE AND ASK 
YOU TO TRY AGAIN. 


. NEXT THE PROGRAM WILL ASK FOR A VECTOR ADDRESS 
. TYPE IN THE VECTOR ADDRESS FOLLOWED BY A <CR> 


IF <CR> ONLY IS TYPED THE PROGRAM WILL USE 
A DEFAULT VECTOR ADDR OF 330(8) 


IF AN INVALID ADDRESS IS TYPED THE PROGRAM 
WILL TYPE AN ERROR MESSAGE AND ASK YOU TO TRY AGAIN. 


- NEXT THE ane WILL ASK FOR THE LINE NO. TO TEST 


TYPE IN THE LINE NO. (IN OCTAL 00-17) FOLLOWED 
BY A <CR> 


IF A <CR> ONLY IS TYPED THE PROGRAM WILL DEFAULT 
TO LINE #00. 


NEXT THE PROGRAM WILL ASK YOU IF YOU WANT TO 
CHANGE LINE PARAMETERS. 
tas Sony “Y" FOR YES = “N” OR <CR> FOR NO FOLLOWED BY 


“IF "NO" THE PROGRAM WILL met TO THE LAST 
LINE PARAMETERS TYPED IN OR IF THIS IS THE 
FIRST DIALOGUE IT WILL DEFAULT TO 9600 BAUD, 
8 BIT CHARS, 1 STOP BIT, AND ODD PARITY. 


IF YOU TYPED “Y" IN (15) DO STEPS (17) THRU (21) 
OTHERWISE GO TO STEP (22) 
WHEN THE PROGRAM ASKS FOR TRANSMITTER SPEED 


SEQ 0014 


18. 


19. 
IN 
20. 
T 
el. 


22. 


23. 


a. 
2s. 


eb. 


27. 


28. 


TYPE oe 7 ¢ on 13. LEGAL SPEEDS IN DECIMAL 
FOLLOWED 


LPR OES, FOE EE HRM 
FOLLOWE 


NOTE: FOR (17) AND (18) IF THE SPEED DESIRED 
I sates TYPE IT WITHOUT THE DECIMAL 


res © PARA 5.2.3 FOR DESCRIPTION OF SPEED 


WHEN THE PROGRAM ASKS FOR CHAR LENGTH, TYPE 
T . LL BY A <CR> 


L 
WHEN THE PROGRAM ASKS FOR PARITY, TYPE IN: 


0 FOR ODD 
E FOR EVEN 
<CR> FOR NONE 


THE PROGRAM WILL NEXT ASK FOR THE FILLER ao 
TYPE IN THE FILLER CHAR FOLLOWED BY A <CR> 


iF A <CR> ONLY IS TYPED THE PROGRAM WILL USE 
A “NULL” FILLER WHICH IS THE NORMAL CASE. 


THE PROGRAM WILL NEXT ASK FOR THE FILLER COUNT. 
TYPE IN THE COUNT IN OCTAL FOLLOWED BY A <CR>. 


IF A <CR> ONLY IS TYPED THE PROGRAM cn DEFAULT 
TO ONE FILLER. IF A NO. GREATER THAN 4 BIT 

IS TYPED THE PROGRAM WILL TRUNCATE IT TO 4 BITS. 
THE MAXIMUM COUNT ALLOWED IS 15(10). 


NEXT 1 ‘weg WILL ASK Oy IF you WANT _SEND 
MODE. TYPE A “Y" IF YES - “N” OR “<CR>" IF NO. 

IF YOU "TYPED “ym IN RESPONSE TO (24) THE PROGRAM 
WILL ASK YOU TO TYPE IN THE SEND BUFFER ON THE 
CONSOLE TTY. WHEN YOU WANT TO SEND THIS BUFFER TO 
THE TEST TERMINAL ON THE DH11 TYPE A “CONTROL-C”. 


NOTE: ALWAYS START THE BUFFER WITH A 
<CR><LF> TO MAKE IT EASIER TO 
INTERPRET THE DISPLAY ON THE DH11 
TERMINAL WHEN THE BUFFER IS SENT. 


AFTER THE TEST BUFFER IS SENT THE PROGRAM WILL 

ASK FOR LINE # AGAIN AND YOU REPEAT THE SEQUENCE 
Ue aa STEP (12) ABOVE. 

IF YOU TYPED SOME CHAR OTHER THAN "Y" IN RESPONSE 
TO (24) "THE PROGRAM WILL ASSUME “ECHO” AND 

ASK YOU TO TYPE_IN ON THE TEST TERMINAL CONNECTED 
TO THE LINE R TEST. 


UNDER TES 
43 GO TO | TEST TERMINAL AND BEGIN TYPING. 
(IF THIS IS A REMOTE TERMINAL, ESTABLISH 
APPROPRIATE MODEM CONNECT 
EACH CHAR TYPED SHOULD BE ECHOED ON THE DH11 TEST 


SES 0015 


23. T 


30. 


TERMINAL. IF YOU WANT TO ECHO AN ENTIRE BUFFER 
TYPE “CONTROL-E” AND THE PROGRAM WILL ECHO THE 
ENTIRE BUFFER TYPED IN ON THE TERMINAL TO THAT 


POINT. 

ts re Ba AND PARAM TERS ~ TYPE “CONTROL-C” 
on th H1l T st TERMINAL AND RETURN TO THE CONSOLE 
TO TEST A DIFFERENT DH11 UNIT, THE PROGRAM MUST 

BE RESTARTED AT 000214(8). 


SEG 0016 
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2.1.2.3 SUBPROGRAM 3 DH11 SINGLE LINE DATA PATTERNS/CABLE TESTS 


ae eee a ee ee ee ee ee og SES 0017 
. TERMINATE THE LINE TO BE TESTED WITH AN H315 
CONNE 


1 

TEST 
e. SET te HALT/ENABLE SWITCH TO HALT 
3. SET THE SR=000220(8) 
4. DEPRESS LOAD ADDRESS 
S. SET THE SR=000001 (TO INHIBIT THE AUTOSIZER) 
NOTE: WHEN THE AUTOSIZER IS NOT_ INHIBITED 
THAT IS SR=O00000, IT WILL LOAD THE FIRST OH 
CSR SS U abe to 


INPUT MAN 
. SET THE HALT/ENABLE SW TO ENABLE 
. DEPRESS START 
. THE PROGRAM WILL TYPE THE TITLE MESSAGES 
AND ASK FOR THE NO. OF ADDRESSES BETWEEN VECTORS. 
TYPE EITHER A “10” OR “20” AS DESCRIBED IN 


PARA 2.1.2.1 (B 7). 

9. NEXT THE PROGRAM WILL ASK FOR THE DH11 DEVICE ADDRESS 
TYPE IN THE DEVICE ADDRESS (IN OCTAL) FOLLOWED 
BY A <CR> 


ono 


IF <CR> ONLY IS TYPED THE PROGRAM WILL USE 
A DEFAULT ADDRESS OF 760020(8) 


IF AN_INVALID ADDRESS IS TYPED THE PROGRAM 
WILL RESPOND WITH AN ERROR MESSAGE AND ASK 
YOU TO TRY AGAIN. 


10. NEXT THE PROGRAM WILL ASK FOR A VECTOR ADDRESS 
11. TYPE IN THE VECTOR ADDRESS FOLLOWED BY A <CR> 


IF_<CR> ONLY IS TYPED THE PROGRAM WILL USE 
A DEFAULT VECTOR ADDR OF 330(8) 


IF AN_INVALID ADDRESS IS TYPED THE PROGRAM 
WILL TYPE AN ERROR MESSAGE AND ASK YOU TO TRY AGAIN. 


le. 7! THE PROGRAM WILL ASK FOR THE LINE NO. TO TEST 
13. By & YPE & NTH E LINE NO. (IN OCTAL 00-17) FOLLOWED 


IF A_<CR> ONLY IS TYPED THE PROGRAM WILL DEFAULT 
TO LINE #00. 


14. NEXT THE PROGRAM WILL ASK YOU IF YOU WANT TO 
CHANGE LINE PARAMETERS. 
15. TYPE “Y” IF YOU DO - “N” OR <CR> IF YOU DON’T 


IF “NO” THE PROGRAM WILL DEFAULT TO THE we 
LINE PARAMETERS TYPED IN OR IF THIS IS THE 
FIRST DIALOGUE IT WILL DEFAULT TO 9600 BAUD, 
8 BIT CHARS, 1 STOP BIT, AND ODD PARITY. 


16. IF YOU TYPED “Y” IN (15) DO STEPS (17) THRU (21) 
OTHERWISE GO TO STEP (22) 


17. 


18. WH 


19. 
20. 
21. 


22. 


23. 


es. 


eb. 


HED TNE ONE OE THE | op. Jegeze, sep 
FOLLOWED BY A <CR> 
N THE PROGRAM asKs FOR RECEIVER SPEED TYPE 
ie ONE Fy 1 LEGAL SPEEDS IN DECIM 
OLLOWE R>. 


NOTE: FOR (17) AND (18) IF THE SPEED DESIRED 
is ig*-5, TYPE IT WITHOUT THE DECIMAL 


WHEN THE PROGRAM ASKS FOR CHAR LENGTH TYPE 
IN THE NO. DESIRED FOLLOWED BY A <CR} 
WHEN THE PROGRAM ASKS FOR THE N NO OF STOP BITS 
TYPE IN THE NO. DESIRED FOLLOWED BY A <CR> 

WHEN THE PROGRAM ASKS FOR PARITY, TYPE IN: 


0 FOR ODD 
E FOR EVEN 
«CR? FOR NONE 


FOLLOWED BY A_<CR> 
THE PROGRAM WILL NEXT ASK FOR THE FILLER RE Tae 
TYPE IN THE FILLER CHAR FOLLOWED BY A <CR> 


f A <CR> ONLY IS TYPED THE PROGRAM WILL USE 
A “NULL” FILLER WHICH IS THE NORMAL CASE. 


THE PROGRAM WILL NEXT ASK FOR THE FILLER COUNT. 
TYPE IN THE COUNT IN OCTAL FOLLOWED BY A <CR>. 


IF A <CR> ONLY IS TYPED THE PROGRAM WILL DEFAULT 
TO ONE FILLER. IF A NO. GREATER THAN 4 BIT 

IS TYPED THE PROGRAM WILL TRUNCATE IT TO 4 BITS. 
THE MAXIMUM COUNT ALLOWED IS 15. 


. NEXT THE PROGRAM WILL ASK YOU THE BUFFER SIZE. 


TYPE IN A DECIMAL NO. BETWEEN 1 TO Sle. FOLLOWED 
BY A <CR>. 


F A <CR> ONLY IS TYPED THE PROGRAM WILL DEFAULT 
0 A BUFFER SIZE OF 256. BYTES. 


THE NO. TYPED IS TOO LARGE AN ERROR MESSAGE 
IS TYPED AND YOU ARE ASKED TO TRY AGAIN. 


NEXT THE PROGRAM WILL ASK FOR THE TYPE OF PATTERN 
AND TELL YOU TO SET SRO7=1 IF YOU WANT TO LOCK ON 
THE SELECTED PATTERN. 

TYPE ( R.B,S, OR <CR>) TO SELECT THE PATTERN 
AS FESCATBED BELOW: 


ALTERNATING 1/70 
BINARY UP COUNT 
BINARY DOWN COUNT 
RANDOM DATA 
TYPED IN BUFFER 
SINGLE CHARACTER 
(CR) SEQUENCE OF A,U,D, AND R 


I 
T 
IF 


Ze soeD 
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27. IF YOU TYPED A,U,D,R, OR <CR>, THE PROGRAM WILL 
TRANSMIT, RECELVE, AND DATA CHECK THE SELECTED PATTERN. 


SRO7=1 IT WILL LOCK ON THIS PATTERN 


SRO7=0 IT WILL RETURN TO STEP (24) 
AFTER COMPLETING THE TEST OF THIS 
PATTERN AND ASK FOR A NEW PATTERN. 


28. IF YOU TYPED A “B™ IN (26) THE PROGRAM Tb ASK 


WI EXEC 
THE TYPED IN BUFFER AS THE 
29. IF YOU TYPED AN “S” IN RESPONSE TO (26) THE PROGRAM 


WILL ASK FOR A SINGLE CHAR. TYPE A SINGLE CHAR 
F With FILL THE BUFFER 


0 
OLLOWED BY A <CR>. THE PROGRAM 
WITH WHE FYeeD IN CHAR AND BEGIN EXECUTION AS IN (27) 
USING THE whe FULL OF THE TEST CHAR AS A PATTERN. 
30. TO CHANGE DH11’S, LINE paren lene ETC. YOU MUST 


RESTART THE TESTS AT LOC. OO0ee0(8). 
2.1.3 RESTART PROCEDURES 


SAME AS THE STARTING PROCEDURES 


fu 


tf 
fu 


SPECIAL ENVIRONMENTS 


102 


ACT11“ THE PROGRAM MAY BE LOADED BY THE ACT1I1/APTI1 


APT11 


XXDP 


YST AND MAY N ART OF A QUI 
SERIE Y eHATN tO NcE The PROGRAN ofhrarke KK AUTOSIZER. 
THE PROGRAM MAY BE LOADED AND RUN FROM 

ANY "XXDP” MEDIUM PROVIDED THERE IS AT LEAST 

12k OF CORE. IT MAY BE RUN AS PART OF AN 

"XXDP” CHAIN. 
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JO0e2 


SWITCHLESS FEATURE 


eek A AAR hae ua 

See Tees, cas hes uae Hi, 
AND. = CONTAINS ALL ONES. (177797) OTHEN THE SOFTWARE. SUITCH 
REGISTER (LOC. 176) IS USED. 


CONTROL: 


THIS PROGRAM ALSO SUPPORTS THE DYNAMIC LOADING OF THE SOFTWARE SWITCH 
REGISTER (LOC. 176) FROM THE TTY. THIS CAN BE ACCOMPLISHED BY 
DOING THE FOLLOWING: 


1) TYPE CONTROL G <#G>; THIS WILL ALLOW THE TTY TO ENTER DATA INTO 
LOC. 176 AT SELECTED POINTS WITHIN THE PROGRAM. 


2) THE MACHINE WILL THEN TYPE: ea (XXXXXX IS THE OCTAL CONTENTS 
OF THE SOFTWARE SWITCH REGISTER. ) 


3) AFTER THE ’’NEW=’’ HAS A TYPED THEN THE OPERATOR CAN DO ONE 
OF THE FOLLOWING AT THE T 


A) wer A NUMBER TO BE LOADED INTO LOC. 176 FOLLOWED BY A <CR>. 
(ONLY E ALLOWED) WILL BE ACCEPTED AND ONLY & NUMBERS 


“ BE A 
IF A <CR> IS THE FIRST KEY DEPRESSED THE SOFTWARE SWITCH 
REGISTER CONTENTS WILL NOT BE CHANGED. 


B) IF A CONTROL U <tU> IS DEPRESSED THEN THE PROGRAM WILL DO A <CR>. 
RETYPE THE DESIRED NUMBER. 


PROGRAM OPTIONS 


A. SUB-PROGRAM 1 DH11 DATA RELIABILITY TESTS 
SRIS=1 HALT ON ERROR 
SRi4=1 LOOP ON CURRENTLY SELECTED DH1! 
SRi3=! INHIBIT ERROR PROGRESS, AND 
PERF ORMANCE PRINTOUTS 
SRE=1 HALTS AFTER CONFIGURATION TO PERMIT 
UNF ING PRECONFIGURED COPIES OF THE 
SR7=1 PERFORMS A STANDARD PASS(NOT QUICK VERIFY.) 
SR7= QUICK VERIFY - DO COMPLETE TESTING 
ON EACH LINE AT 9600. BAUD ONLY 
SRi=1 Types DEVICE MAP GENERATED BY THE 
SRO=1 ALLOWS THE USER TO INPUT DH PARANE TERS 


MANUALLY. (INHIBITS THE AUTOSIZER. ) 
8B. SUS-PROGRAM 2 DH11 SINGLE LINE ECHO TESTS 
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2.3.2 


KO0e 


(NONE ) 

C. SUB-PROGRAM 3 DH11 SINGLE LINE PATTERNS/CABLE TESTS 
SR15=1 HALT ON ERROR 
SR13=1 INHIBIT ERROR AND STATUS PRINTOUTS 
SRO7=1 LOOP ON CURRENT TEST PATTERN 


CORE MEMORY LOCATIONS 


A. SUB-PROGRAM 1 DH11 DATA RELIABILITY TESTS 

WHEN THE AUTOSIZER OPTION IS USED, THIS PROGRAM 
CAN RUN NON-STANDARD DH11 CONFIGURATIONS {NON-CONTIGUOUS 
ADDRESSES). THE USER CAN ALSO PATCH IN HIS OWN Ee By MATCH 


E TO R 
UPDATED PROGRAM. THE TABLES AND LOCATIONS TO MODIFY ARE DES- 
CRIBED BELOW: 


1) DEVICE ADDRESS TABLE 

ERS IS °. 16. WORD TABLE STARTING AT THE ADDRESS 
TAGGED “DHADTB:” hal? PROGRAM LOADED TO SPECIFY 16. 
THIS TABLE I DH11’ ; TOTAR TING AT THE BUS TINE TF THE 


USER TYPES Th A DIFFERENT STARTING ADDRESS 


OR IT 
BE PATCHED TO REFLECT ANY UNIQUE DH11 SYSTEM RoNFICURATION. 


2) VECTOR ADDRESS TABLE 


THERE IS A 16. WORD TABLE STARTING AT THE ADD- 
RESS TAGGED “DHVCTB:” THAT IS PROGRAM LOADED TO 
SPECIFY 16. CONTIGUOUS VECTORS STARTING WITH 330(8) 
AND EACH ENTRY DISPLACED BY 8. WORDS (330,350,370 ETC.) 
THIS TABLE IS MODIFIED AT CONFIGURATION TIME {fF THE 
TYPES A DIFFERENT STARTING VECTOR ADDRESS, T 

NAY BE PATCHED TO REFLECT ANY UNIQUE DH11 SYSTEM CON- 


3) BR LEVEL TABLE 


THERE IS A 16. WORD TABLE STARTING AT THE ADDRESS 
TAGGED “BRLVL:” THAT IS PROGRAM LOADED TO wes «< 


F OTH XMIT AND nee IVE FOR ALL 16. DH1 Ti 
CHANGED AT CONFIGURATION TIME BUT MAY BE patcH HED T 
REFLECT ANY UNIQUE DH11 SYSTEM CONFIGURATION. 

4) DEVICE SELECTION PARAMETER 


nen . He | WORD TAGGED War eh THAT IS PROGRAM 
LOADED TO C gonna +? WHICH SELECTS ONLY ONE 
DH11_ (DH1 HOC). 2 SPEC TION CAN MODIFIED AT 
CONF IGURA . TINE a Y ANY COMBINATION OF 
DH11°S UP OF 16. UNITS. REFER TO 
PA Ra 2.1.3 4 fe m0) "FOR A DESCRIPTION OF ITS ENCODING. 


SEG 0022 


S) LINE SELECTION PARAMETER (PARA 2.1.2.1 (B11)) 


THERE IS A om, Ma “LINSEL:” THAT IS 
PROGRAM LOADED AS 177777(8) TO SPECIFY 7 ~ 
LINES ARE TO BE Test ED IN EACH hee itp DH1 
8 MAY BE MODIFIED AT CONFIGURATION TIME 70. SPECIFY 
COMBINATION OF LINES TO TEST. REFER TO SECTION 
1.3 (B 11) FOR A DESCRIPTION OF ITS ENCODING. 


NOTE: tat oy! ee A tl be TABLE 


T_IT USES 
THRE SS THERPENTEN GPM 


OH1I CONFIGURATION TO BE TESTED. 


B. SUB-PROGRAM 2 DH11 SINGLE LINE ECHO TESTS 
(NONE } 

C. SUB-PROGRAM 3 DH11 SINGLE LINE PATTERNS/CABLE TESTS 
1)PATLIM: 10. 


THERE IS A LOCATION TAGGED “PATLIM:" THAT 
SPECIFIES THE NO. OF TEST PATTERN ITERATIONS TO EXECUTE 
IN THE PATTERNS TESTS. IT IS PROGRAM LOADED TO SPECIFY 
TEN ITERATIONS BEFORE THE “TEST DONE” REPORT IS TYPED. 


2) DATCNT: . 
THERE IS A LOCATION TAGGED “DATCNT:" THAT KEERS 
A COUNT OF THE NO. OF ITERATIONS Gets Pep QUTAS 


GE_IF A DATA ERROR OCCURS 
IN THE PATTERNS TEST UNDER THE HEADING “ICOUNT”. 
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Moe 
2.4 EXECUTION TINS | se O02 


1. SRO7=0 QUICK TEST 


APPROXIMATELY 15. SECONDS FOR EACH LINE WITH 
1824 CHARS BEING TRANSMITTED AND RECEIVED. 


2. SR7=1 COMPLETE TESTING 


1B 520-CHARS BETNG TRANSRITTED AND RECEIVED ON EACH 
Fae SELECTED FOR TEST. 
B. SUB-PROGRAM 2 DH11 SINGLE LINE ECHO TESTS 


NOT APPLICABLE SINCE THESE TESTS a Ng THE 
USER MANUALLY TYPING IN ON THE TERMINAL 


C. SUB-PROGRAM 3 DH11 SINGLE LINE PATTERNS/CABLE TESTS 


EXECUTION TIMES VARY FROM LESS THAN S SECONDS TO GREATER 
THAN 1S. MINUTES DEPENDING UPON BUFFER SIZE, LINE PARAMETERS, AND 
PATTERN SELECTED. 


3.0 


3.1 


3.1.1 


N02 


ERROR INFORMATION 


STANDARD SYSMAC.SML ERROR REPORTING CONVENTIONS 


THE PROGRAM _UTILI at Te omit PDP11 DIAGNOSTICS ERROR 
UTILITIES. THE reer NE CALLS bere nie ys. USING AN 


ore Freon Resse Pe marion TION sla: Beck ie 


DESCRIBED IN SECTI coe 
IN THREE LINES OF OUT AS E FOLLONS: 


LI A BRIEF DESCRIPT FAILING FUNCTION 
LINE g tageLs 10 IDENT TAY THE ave. TY ON LINE 3 
LINE 3 THE ACTUAL OR DATA (UP TO 8 OCTAL OR DECIMAL NO.S) 
EXAMPLE: 
SYSTEM CONTROL REGISTER ERROR 


oue?2o ooodoe ooio74 ododus Teoded ‘eoded 0ddd00 doo: 


THE ERROR TABLE ITEMS SHOWN IN THE NEXT SECTION DESCRIBE ALL 
hori tte. MESSAGES WITHIN MD-11-DZDHN AND ARE INTERPRETED 


EM ADDRESS OF THE MES FOR LINE 1 
DH ADDRESS OF THE DATA R MESSAGE FOR L 


INE 2 
DT ADDRESS OF THE TABLE OF ADDRESSES THAT POINT 
TO THE DATA WORDS a BE Oath oe 
DF ADDRESS THAT POIN a 0 THE 
ie E THAT DEF INES NETHER BN ITER is “GCTRL OR DECIMAL. 
HIS ENTRY IS “0” ALL DATA WORDS ARE IN offal. 


SECTION 3.1.3 DEFINES THE MEANING OF THE MNEUMONICS USED 
IN THE VARIOUS DATA HEADERS. 
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BOS 


3.1.2 ERROR MESSAGE TABLE 


;ERROR TABLE ITEM FOR ERROR 1 
M1 ;"NON EX MEMORY ERROR - DROPPED LINE # ™ 


H1 :" (PC) CURLPR DEVADR REGADR wins S/B" 

OT1 :"SERRPC, CURLPR, SREG1, SREG2, SREG3, SREGY 
DF2 :PRINT ALL OCTAL 

:ERROR TABLE ITEM FOR ERROR 2 
EMe2 ; TRANSMITTER FALSE INTERRUPT - DROPPED LINE# “ 
OH1 (PC)  CURLPR DEVADR REGADR WAS S/B" 
OT1  egERRPC CURLPR SREG1, SREG2, SREG3, SREGY 
OF2 ‘PRINT ALL OCTAL 

;ERROR TABLE ITEM FOR ERROR 3 
EM3 ;"BUFFER ACTIVE REGISTER ERROR - DROPPED LINE & “ 
DH1 ) CURLPR DEVADR REGADR WA S78" 
OT1 :"SERRPC, CURLPR, SREG1, SREG2, SREGS, SREGY 
OF2 :PRINT ALL OCTAL 

;ERROR TABLE ITEM FOR ERROR 4 
EMY srBYTE COUNT REGISTER ERROR - DROPPED LINE # ” 
DH1 (PC)  CURLPR DEVADR REGADR WAS g, B" 
OT1 :"SERRPC, CURLPR, SREG1, SREG2, SREG3, SREGY 
OF2 :PRINT ALL OCTAL 

sERROR TABLE ITEM FOR ERROR S 
EMS {CURRENT ADDRESS REGISTER ERROR - DROPPED LINE # 
DH1 ( CU VADR REGADR WAS S/B" 
OT1 tm gERRDC CURLPR, SREG1, SREG2, SREGS, SREGY 
OFe2 :PRINT ALL OCTAL 

sERROR TABLE ITEM FOR ERROR 6 
EM6 ;mSILO OVERFLOW ERROR - DROPPED LINE # “ 
DH1 (PC) CURLPR DEVADR REGADR as S/B" 
OT1 Se SERRPC CURLPR, SREG1, SREG2, SREG3, SREGY 
OF2 ‘PRINT ALL OCTAL 

sERROR TABLE ITEM FOR ERROR 7 
EM? ;"RECEIVER FALSE INTERRUPT - LINE # ” 
DH1 (PC) CURLPR DEVADR REGADR ‘as S/B" 
yi lt I EERRPC CURLPR, SREGI, SREG2, SREGS, SRECH 
OF2 ‘PRINT ALL OCTAL 

sERROR TABLE ITEM FOR ERROR 10 
EM10 ;" INVALID DATA IN SILO - DROPPED LINE # ” 
DH? (PC) CURLPR CHAR # WASADR SHBADR WAS S/B" 
OTe  SERRPC CURLPR, SREGO, SREGI. SREG2, SREG3, SREGY 


OFe2 ‘PRINT ALL OCTAL 
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;ERROR TABLE 


;ERROR TABLE 


;ERROR TABLE 


NOTE: 


0 


0 
DT4 
DF 1 


;ERROR TABLE 


CO3 


ITEM FOR ERROR 11 
"DATA ERROR - spline 
: (PC) CUR CHAR 8 WASADR SHBADR _WAS S/B" 
? SERRPC cORTPR Reareoe SREG!. REG2, $REG3, SREGY 
*PRINT ALL OCTAL 


ITEM FOR ERROR 12 
snTEST TIMEOUT - DROPPED LINE # 
(PC)  CURLPR RTOTAL XTOTAL " RDONE™ 
gE RRPC CURLPR, STMPO, STMP1RDONE™ 
PRINT ALL OCTAL 
ITEM FOR ERROR 13 
ERROR 13 IS CALLED TO PRINT EACH LINE OF DATA IN THE 


ERROR STATISTICS TABLE. IT PRINTS ONLY DATA WITHOUT ANY 
MESSAGE OR DATA HEADERS. 


:NO MESSAGE 
:NO DATA HEADER 
?STMPO,STMP1, STMP2, STMP3, STMPY, STMPS, STMPG 
:PRINT ALL DECIMAL 
ITEM FOR ERROR 14 
; "BUS ERROR TRAP To o4” 
( APPC TRAPPS” 


(SP) TR 
‘SERRE STMPO SREGE, SREG1, $REG2” 
*PRINT ALL OCTAL 


ITEM FOR ERROR 15 
(er INSTR TRAP TO 10” 


(SP) TRAPP 
 SERRPC STMPO, SREG6, SREG!, SREGO” 
‘PRINT ALL OCTAL 


ITEM FOR ERROR 16 


i SINGLE LINE ECHO TEST - INTR WAIT TIMEOUT” 
DEVADR LINE (SCR) CURLPR EXFLAG" 

SERRE C SREG1,LINE,$TMPO, CURLPR. EXFLAG™ 

‘PRINT ALL OCTAL 


¢ TRAPPS” 
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NOTE: 


;ERROR TABLE 
la 
Hb 
DT7 
OFe 
;ERROR TABLE 


;ERROR TABLE 


DOS 


ERRORS 17 THRU 24 ARE USED TO REPORT PERFORMANCE 
NOT ERRORS. 


ITEM FOR ERROR 17 


;TALTERNATING 1/0 PATTERN TEST DONE™ 
(PC)  OEVADR LINE  CURLPR ICOUNT” 

 SERREC DHADR, LINE, CURLPR, $REGO 

:PRINT ALL OCTAL 


ITEM FOR ERROR 20 


;"BINARY UP COUNT PATTERN TEST DONE” 
(PC) DEVADR LINE CURLPR ICOUNT” 

} SERRPC DHADR, LINE, GURLPR, SREGO 

?PRINT ALL OCTAL 


ITEM FOR ERROR 21 


; MBINARY DOWN COUNT PATTERN TEST DONE” 
(PC)  DEVAD CURLPR ICOUNT™ 

 SERRPC DHADR, LINE, CURLPR, SREGO 

:PRINT ALL OCTAL 


ITEM FOR ERROR 22 


; ZRANDON DATA PATTERN TEST DONE” 
(PC) OD LINE  CURLPR ICOUNT™ 

 SERREC DHADR, LINE, CURLPR, $REGO 

:PRINT ALL OCTAL 


ITEM FOR ERROR 23 


;SINGLE CHAR PATTERN TEST DONE™ 

(PC) VADR LINE  CURLPR ICOUNT” 
 SERRPC DHADR, LINE, CURLPR, $REGO 
:PRINT ALL OCTAL 


ITEM FOR ERROR 24 


s TYPED BUFFER PATTERN TEST DONE” 
(PC) INE CURLPR ICOUNT” 

? SERRORPC BHD LINE, CURLPR, SREGO 

*PRINT ALL OCTAL 


ITEM FOR ERROR 25 


;"DATA PATTERNS TEST TIMEOUT” 
*" (PC) DEVADR LINE CURLPR ICOUNT PATCDE” 
: SERRPC, DHADR, LINE, CURLPR, SREGO, SREG! 

‘PRINT ALL OCTAL 
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3.1.3 


E03 


DATA HEADER MNEUMONIC DEFINITIONS 


ALL NUMBERS PRINTED AS ERROR DATA ARE IN OCTAL 


(PC) 
(PS) 
(SP) 
LINE 
DEVADR 
REGADR 
WAS 
S/B 
TRPPC 


TRPPS 


WASADR 
SBADR 
CHAR & 
ICOUNT 


PATCDE 


(SCR) 
EXFLAG 


ADDRESS OF THE ERROR CALL (ERROR PC) 

CONTENTS OF THE PSW AT THE TIME OF THE ERROR 

CONTENTS OF THE STACK POINTER AT THE TIME OF THE ERROR 
INDICATES THE LINE NUMBER THAT FAILED 

DEVICE ADDRESS - 1ST ADDRESS IN THE SELECTED DH11 
ADDRESS OF THE DH11 REGISTER BEING TESTED 

WHAT THE ACTUAL DATA READ WAS (DH11 REG OR CORE LOC.) 
WHAT THE DATA READ SHOULD HAVE BEEN 


CONTENTS OF THE PC (R7) AT THE TIME OF A BUS ERROR 
OR RSVD INSTR TRAP. 


CONTENTS OF THE oy AT THE TIME OF A BUS ERROR 
OR RSVD INSTR TRAP 


CORE MEMORY ADDRESS OF THE “WAS” DATA (ACTUAL DATA READ) 
CORE MEMORY ADDRESS OF THE S/B DATA (GOOD DATA) 
INDICATES THE CHARACTER POSITION IN THE DATA BUFFER 


INDICATES ITERATION COUNT OF DATA PATTERNS TESTS - 
PROGRAM DEFAULTS TO ITERATING EACH PATTERN 10. TIMES. 


INDICATES PATTERN BEING TESTED WHEN ERROR OCCURRED 
AS SHOWN BELOW: 


PATCDE= 101 © ALTERNATING 1/70 PATTERN 
125 ‘BINARY UP COUNT PATTERN 
IN COUNT 
R PATTERN 
102 TYPED IN "BUFFER PATTERN 


INDICATES CONTENTS OF THE “SCR” REG WHEN ERROR OCCURRED 


INDICATES STATE OF THE XMITTER_INTR SERVICE ROUTINE 
IN THE ECHO TESTS AS SHOWN BELOW: 


EXFLAG= 1 CONTROL-C WAS a 2 
e CONTROL-E WAS TYPED 
3 BUFFER WAS BEING DUMPED 
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tw 


. 
mw 


tw 


FOS 
POWER FAIL PRINTOUT 
vB Bot nano SEG 0030 


IF A POWER FAILURE OCCURS WHILE THE PROGRAM IS RUNNING, 
THE FOLLOWING PRINTOUT OCCURS: 


“POWER” 


AFTER THE PRINTOUT THE PROGRAM WILL BE RESTARTED AUTOMATICALLY 
FROM THE BEGINNING. NO ATTEMPT IS MADE TO CONTINUE THE PROGRAM 
FROM THE POINT OF THE POWER FAIL INTERRUPTION. 


ERROR HALTS 


A. SYSMAC ERROR SERVICE ROUTINE HALT 


WHEN SR1S=1 A “HALT” IS EXECUTED IN THE SYSMAC ERROR 
UTILITY AFTER THE ERROR TYPEOUT. TO RESUME TESTING 
FROM THE POINT OF THE “HALT” SIMPLY DEPRESS CONTINUE. 


B. POWER FAIL HALT 


WHEN A POWER DOWN IS DETECTED, THE PROGRAM HALTS IN 
THE POWER FAIL UTILITY ROUTINE. IF FOR SOME REASON 

Ly 3 Mae Lath fe * FAILS TO RESTART THE PROGRAM, 
THE PROGRAM WIL "ON THIS HALT IF CONTINUE IS’ 

DEPRESSED. IN THIS CSE THE PROGRAM MUST BE RESTARTED. 


¢. TRAP CATCHER HALTS 


ALL INACTIVE VECTORS ARE SET UP WITH THE STANDARD 
PDP11 TRAP CATCHER AS DESCRIBED BELOW: 


VN / VN¢e 
VN+2/ HALT 


IF A TRAP OR ee OCCURS TO A ne Kt THAT HAS 
NOT_BEEN abi UP BY THE TEST ROUTINE “HALT” OCCURS 
IN THE VECTOR AREA. THE ADDRESS BYSPLAY f NDICATES 
WHICH YECTOR THE PROGRAM TRAPPED TO AND i NE LAST ENTRY 
PUSHED ON TO THE STACK INDICATES WHERE THE PROGRAM WAS 
WHEN THE TRAP OR INTERRUPT OCCURRED. 


oO 


GO3 
PERFORMANCE AND PROGRESS REPORTS 


A. SUB-PROGRAM 1 DH11 DATA RELIABILITY TESTS 

AT THE COMPLETION OF EACH PASS THROUGH —, DH11 UNDER 
TEST A, WHEN INVOKED BY THE USER TYPING AN “S” ON THE CONSOLE 
TERM THE STATISTICS TABLE SHOWN BELOW IS TYPED ON THE CONSOLE 
DEVICE. OTHE TOBE CONSERTS oF “NN” ENTRIES WHERE “NN” IS THE 
NUMBER OF LINES SELE OR TEST. 


DH #NN STATISTICS: 
LINE # RTOTAL XTOTAL DATERR PARERR FRMERR OVRERR 


LLLLLL RRRRRR XXXXXX DDDDDD PPPPPP FFFFFF 000000 
LLLLLL RRRRRR XXXXXX DDDDDD PPPPPP FFFFFF 009000 
LLLLLL RRRRRR XXXXXX DDDDDD PPPPPP FFFFFF 000000 
LLLLLL RRRRRR XXXXXX DDDDDD PPPPPP FFFFFF 000000 
LLLLLL RRRRRR XXXXXX DDDDDD PPPPPP FFFFFF 000000 
LLLLLL RRRRRR XXXXXX DDDDDD PPPPPP FFFFFF 000000 
LLLLLL RRRRRR XXXXXX DDDDDD PPPPPP FFFFFF 000000 
LLLLLL RRRRRR XXXXXX DDDDDD PPPPPP FFFFFF 000000 
LLLLLL RRRRRR XXXXXX DDDDDD PPPPPP FFFFFF 000000 
LLLLLL RRRRRR XXXXXX DDDDDD PPPPPP FFFFFF 000000 
LLLLLL RRRRRR XXXXXX DDDDDD PPPPPP FFFFFF 060000 
LLLLLL RRRRRR XXXXXX DDDDDD PPPPPP FFFFFF 000000 
LLLLLL RRRRRR XXXXXX DDDDDD PPPPPP FFFFFF 900000 
LLLLLL RRRRRR XXXXXX DDDDDD PPPPPP FFFFFF 000000 
LLLiLL RRRRRR XXXXXX DDDDDD PPPPPP FFFFFF 000000 
LLLLLL RRRRRR XXXXXX DDDDDD PPPPPP FFFFFF 000000 


WHERE : HE DH11 & IN OCTAL 
HE LINE & IN OCTAL 
HE TOTAL NO. OF CHARS RECEIVED IN DECIMAL 
HE TOTAL NO. OF CHARS TRANSMITTED IN 


LN DECIMAL 
HE TOTAL NO. OF DATA COMPARE ERRORS DETECTED IN DECIMAL 
HE TOTAL NO. OF PARITY ERRORS IN DECIMAL 
HE TOTAL NO. OF FRAMING ERRORS IN DECIMAL 
HE TOTAL NO. OF OVERRUN ERRORS IN DECIMAL 


Oonvoexzar =z 


HO3 


NOTES: 1.) IF A LINE WAS DROPPED ae THE TEST DUE TO AN 
UNRECOVERABLE READ OR WRITE ERROR THE MESSAGE SHOWN SES C032 
BELOM WILL REPLACE THE NORMAL ERROR STATISTICS ENTRY: 


“LINE #NN WAS DROPPED” 
WHERE “NN” IS THE LINE NO. IN OCTAL. 


IF THE PRINTOUT IS INVOKED BY TYPING AN “S” , THE 
“RTOTAL” AND “XTOTAL” ENTRIES MAY OR MAY NOT" BE EQUAL 2 
DEPENDING UPON WHEN THE PROGRAM “SAW” THE “S”. ; 


AFTER PRINTING THE ERROR STATISTICS a THE PROGRAM 

WILL RESTART AND BEGIN TESTING THE NEXT DA11 IN SEQUENCE. 

IF ONLY ONE DH11 IS SELECTED FOR TEST OR SR14=1, THE SAME DH11 
WILL BE TESTED AGAIN. 


B. SUB-PROGRAM 2 DH11 SINGLE LINE ECHO TESTS 
1) SEND MODE: THE DISPLAY ON THE DH11 TEST TERMINAL 


SHOULD MATCH THE BUFFER TYPED IN ON 
THE CONSOLE TERMINAL. 


2) ECHO MODE: THe CHARACTERS cCRD ON_THE put rest 
TERMINAL SHOULD MATCH THE CHARACTER 
TYPED ON THE TEST TERMINAL KEYBOARD. 


C. SU8-PROGRAN 3 DH11 SINGLE LINE PATTERNS/CABLE TESTS 
(NCNE PROVIDED) 


ru 


w 


I03 


4.2 PROGRESS REPORTS 


A. SUB-PROGRAM 1 DH11 DATA RELIABILITY TESTS 


1. GACH oan AA NEW HII IS SELECTED FOR TEST 


“TESTING DH11 #NN” 


WHERE “NN” IS THE NO. IN OCTAL 5 THE DH11 
CURRENTLY BEING TESTED. (00 - 


2. EACH TIME A NEW LINE IS SELECTED FOR TEST 
THE PROGRAM TYPES: 


“TESTING LINE #NN” 
WHERE “NN” IS THE LINE NO. IN OCTAL (00 - 17) 


3. AFTER COMPLETE TESTING OF ALL SELECTED DH11’S THE 
FOLLOWING MESSAGE IS PRINTED: 


“END PASS #NNNNN” 
WHERE : N IS THE NO. OF COMPLETE PROGRAM 
PASSES DURING THE CURRENT “RUN” 
B. SUB-PROGRAM 2 DH11 SINGLE LINE ECHO TESTS 


(NONE SUPPLIED) 
C. SUB-PROGRAM 3 DH1i SINGLE LINE PATTERNS/CABLE TESTS 


EACH TIME A SPECIFIC TEST PATTERN TEST IS COMPLETED 
(10. ITERATIONS) THE FOLLOWING MESSAGE IS TYPED: 


“NAME” PATTERN TEST DONE 
(PC) DEVADR CURLPR ICOUNT 
PPPPPP DDDDDD LLLLLL cccece IIIII! 
WHERE: NAME IS THE NAME OF ye flee - IE “RANDOM”, 


“BINARY UP C 
p IS THE PC OF THE he ESA E CALL 

D 1S THE ADDRESS OF THE noe f UNDER TEST 

L IS THE LINE NO. BEING TESTED 

¢ 1S THE CONTENTS OF THE “LPR” DURING THE TEST 

I 1S THE NO. OF TEST PATTERN ITERATIONS COMPLETED 


THIS TYPEOUT MAY BE INHIBITED BY SETTING SR13=1. 


DH11 DEVICE INFORMATION 
wann--=---- n= === --====- SEQ 0034 


THE DH11 USES FLOATING ADDRESSES AND IS LOCATED AFTER DJ11°S IN THE FLOATING ADDRESS SPACE THAT BEGINS AT LOCATION 760 O10. 
BECAUSE THE DH11 HAS EIGHT REGISTERS, IT MUST BE ASSIGNED AN ADDRESS THAT IS A MULTIPLE OF 20 (OCTAL). ALL DHI1’S INA 
SYSTEM SHOULD HAVE CONSECUTIVE ADDRESSES. “4% 


EXAMPLE #1: A SYSTEM WITH NO DJ11’S BUT TWO DH11’S. 
760 010 CANNOT USE FOR DH11’S BECAUSE NOT MULTIPLE OF 20. 


760 O20 FIRST DH re 
760 O40 SECOND DHI | 
{ 
{ 


; 


760 060 DH11 GAP (INDICATES THAT THERE ARE NO MORE DH11’S). 
EXAMPLE #2: A SYSTEM WITH ONE DJ11, TWO DH11’S: 


760 010 FIRST DJ11 

760 O20 DJ11 GAP (INDICATES THAT THERE ARE NO MORE DJ11’S). 

760 030 ali USE FOR DH11’S BECAUSE NOT MULTIPLE OF 20. 

760 O40 FIRST DH11 

760 060 SECOND DH11 

760 100 DH11 GAP (INDICATES THAT THERE ARE NO MORE DH11’S). 

THE DH11 VECTORS (2) FOLLOW THOSE OF THE DJ11 IN THE FLOATING VECTOR SPACE THAT STARTS AT ADDRESS 300. THE VECTORS STARTING 


AT 300 ARE USED IN THE FOLLOWING ORDER: DC11; KL11/DL11-A, B; DP11; DM11-A; DN11; DM11-BB; DR11-A; DR11-C; PAS11 READERS; 
PAb11 PUNCHES; DT11; OX11; DLI1-C, D, E; DHII. 


THE RECEIVER VECTOR IS THE LOWER NUMBERED VECTOR. THE PRIORITY OF THE RECEIVER AND TRANSMITTER INTERRUPTS ARE INDIVIDUALLY 
SELECTABLE BY MEANS OF TWO STANDARD PDP11 PRIORITY JUMPER PLUGS. BR LEVEL 5 IS STANDARD. | 


REGISTER DEFINITION 


THE FOLLOWING SECTION DESCRIBES THE BIT ASSIGNMENTS as EACH REGISTER: ap tag UNUSED AND WRITE ONLY ARE ALWAYS READ 
AS ZERO. ATTEMPTING TO WRITE INTO UNUSED OR READ ONLY BITS HAS NO EFFECT ON THOSE BITS. INIT REFERS TO THE INITIALIZE SIGNAL : 
GENERATED BY THE PROCESSOR (E.G. UPON EXECUTION OF A RESET INSTRUCTION). TRANSMIT AND RECEIVE ARE WITH RESPECT TO THE DH11. 


$.2.1 


KO3 


THE SYSTEM CONTROL REGISTER - ADDRESS x00 


THE SYSTEM CONTROL REGISTER IS A BYTE-ADDRESSABLE REGISTER. THE BIT ASSIGNMENT IS AS FOLLOWS: 


BITS 


00-03 


04, OS 


06 


07 


08 


093 


10 


11 


le 


DESCRIPTION 


LINE SELECTION 
EACH OF THE 16 LINES SERVED BY THE DH11 HAS ITS OWN STORAGE FOR LINE PARAMETER INFORMATION, CURRENT ADDRESS, AND 
BYTE COUNT. THESE STORAGE LOCATIONS ARE LOADED BY THE PROGRAM VIA THE LINE hig Be REGISTER CURRENT ADDRESS 
REGISTER, AND 4. COUNT REGISTER, BUT THE HARDWARE MUST FIRST BE TOLD WHICH LINE IS T E {TS LINE PARAMETERS, 
CURRENT ADDRESS, OR BYTE COUNT CHANGED. THIS ROUTING IS ACCOMPLISHED BY SETTING THE LINE” SELECTION BITS TG 
THE BINARY ADDRESS (0000-1111) OF THE DESIRED LINE. THESE BITS ARE READ/WRITE. 
MEMORY EXTENSION 
THE een eae STORED IN THESE BITS BECOMES BITS 16 AND 17 RESPECTIVELY OF ANY CURRENT ADDRESS LOADED BY THE 
PROGRA oP THE CURRENT ADDRESS REGISTER. THESE BITS ARE _READ/WRITE BUT, WHEN READ, REPRESENT ONLY THE STATUS 

4 AND 5 OF THE SYSTEM CONTROL REGISTER, NOT THE STATUS OF ADDRESS BITS 16 AND 17 OF THE SELECTED LINE. 


SEE THE SILO STATUS REGISTER FOR FURTHER INFORMATION. THIS ARRANGEMENT PERMITS INTERRUPT SERVICE ROUTINES TO 
SAVE THE CONTENTS OF THE SYSTEM CONTROL REGISTER ACCURATELY. 


RECEIVER INTERRUPT ENABLE 

THIS BIT, WHEN SET, ENABLES RECEIVER INTERRUPTS (BIT 7) 

RECEIVER INTERRUPT 

THIS BIT, WHEN SET, INDICATES THAT THE NUMBER OF CHARACTERS STORED IN THE ae EXCEEDS THE “ALARM LEVEL” 
SPECIFIED BY THE LOW BYTE OF THE SILO STATUS REGISTER. THIS BIT IS READ ONLY, EXCEPT IN MAINTENANCE MODE, 
oh off. READ/WRITE. SETTING OF THIS BIT WILL GENERATE AN INTERRUPT REGUEST IF BIT 6 (ABOVE) 

CLEAR NON-EXISTENT MEMORY INTERRUPT 


THIS BIT, WHEN SET, CLEARS THE NON-EXISTENT MEMORY INTERRUPT FLIP-FLOP (BIT 10) AND CLEARS ITSELF. THIS BIT 
IS READ/WRITE. 


MAINTENANCE 

THIS BIT, WHEN SET, PLACES THE DH11 IN MAINTENANCE MODE. 

NON-EXISTENT MEMORY 

THIS BIT IS SET WHENEVER THE NPR HARDWARE PLACES THE ADDRESSES OF A MEMORY LOCATION ON THE een AND 

NO SLAVE SYNC IS RECEIVED IN 20 US. THIS INDICATES THAT THE ADDRESSED LOCATION OR DEVICE DOES NOT EXIST. 

THIS BIT CAUSES AN INTERRUPT REQUEST IF SET WHILE TRANSMITTER AND NON-EXISTENT MEMORY INTERRUPT ENABLE IS SET. 
THIS BIT IS READ ONLY, EXCEPT IN MAINTENANCE MODE, WHERE IT IS READ/WRITE. 

MASTER CLEAR 


THIS BIT, WHEN SET, GENERATES “INITIALIZE” WITHIN THE DH11 cL ARING THE SILO, THE UARTS, AND THE REGISTERS. THE 
EXACT BITS CLEARED’ARE DISCUSSED IN THE SECTION ON INITIA ALtzA ON. READ/WRITE. 


STORAGE INTERRUPT ENABLE 
THIS BIT, WHEN SET, PERMITS THE SETTING OF BIT 14 TO GENERATE AN INTERRUPT REQUEST. THIS BIT IS READ/WRITE. 


SEG 0035 


13 


14 


15 


TRANSMITTER AND NON-EX-MEM INTERRUPT ENABLE Seo 002% 
THIS BIT, WHEN SET, PERMITS THE SETTING OF BIT 10 OR 15 TO GENERATE AN INTERRUPT REQUEST. THIS BIT IS READ/WRITE. 


STORAGE INTERRUPT 


THIS BIT IS SET WHEN THE RECEIVER SCANNER FINDS A RECEIVER HOLDING BUFFER WITH A CHARACTER IN IT, TRIES TO 
STORE THAT CHARACTER IN THE SILO, AND CANNOT DO SO BECAUSE OF A LACK OF SPACE. WHEN SET THIS BIT WILL CAUSE 
a eS A el IF BIT 12 15 SET. THIS BIT IS READ ONLY, EXCEPT IN MAINTENANCE MODE, WHERE 


TRANSMITTER INTERRUPT 
THIS BIT IS SET WHEN THE DH11 CONCLUDES AN NPR CYCLE THAT INCREMENTED A BYTE COUNT TO ZERO, INDICATING THE LAST 


DICATI 
HARACTER INA MESSAGE BUFFER WAS LOADED INTO A _UART TRANSMITTER HOLDING REGISTER. THIS BIT WILL CAUSE AN INTERRUPT 
Quest IF BIT Ne ig aan Air art tS READ/HRET . CIT IS ert BURING AN NPR CYCLE. ) 


$.2.2 


MO3 


NEXT RECEIVED CHARACTER REGISTER ADDRESS x02 


le 


13 


14 


15 


ee ee Lt Le ee ee SES 0037 


NEXT RECEIVED CHARACTER 
THESE BITS CONTAIN THE NEXT RECEIVED CHARACTER, RIGHT JUSTIFIED. THE LEAST SIGNIFICANT BITS IS BIT OO. 
LINE NUMBER 


THESE BITS INDICATE THE LINE NUMBER ON WHICH THE NEXT RECEIVED CHARACTER WAS RECEIVED. BIT 8 IS THE 
LEAST SIGNIFICANT BIT. 


PARITY ERROR 
THIS BIT IS SET IF THE PARITY OF THE RI -EIVED CHARACTER DOES NOT AGREE WITH THAT DESIGNATED FOR THAT LINE. 
FRAMING ERROR 


THIS BIT IS SET IF THE RECEIVER SAMPLES A LINE FOR THE FIRST STOP BIT, AND FINDS THE LINE IN A SPACING CONDITION 
(LOGICAL 0). THIS CONDITION USUALLY INDICATES THE RECEPTION OF A BREAK. 


DATA OVERRUN 


THI es SET WHEN THE RECEIVED CHARACTER WAS PRECEDED BY A CHARACTER THAT WAS LOST DUE TO THE INABILITY OF THE 
REC 1 R SCANNER TO SERVICE THE UART RECEIVER HOLDING BUFFER. REFER TO THE SECTION ON PROGRAMMING FOR 
FURTHER DETAILS ON DOUBLE BUFFERED RECEPTION. 


VALID DATA PRESENT 


THIS BIT pores THAT THE DATA PRESENTED IN BITS 14-00 IS VALID. IT PERMITS A CHARACTER HANDLING PROGRAM TO TAKE 

CHARACTERS FROM THE SILO UNTIL IT IS EMPTY. THIS IS DONE BY READING THIS REGISTER AND CHECKING BIT 15 UNTIL A WORD 

Be Pon bone Bacte” BIT 15 IS A ZERO. THE ENTIRE NEXT RECEIVED CHARACTER REGISTER IS READ-ONLY AND IS ADDRESSABLE 
kL 
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NOS 
LINE PARAMETER REGISTER ADDRESS X04 
aaneenenmasecrmmnaes SEG 0038 


THIS REGISTER SHOULD BE LOADED ONLY AFTER THE LINE SELECTION BITS OF THE SYSTEM CONTROL REGISTER HAVE BEEN SET TO SELECT THE 
LINE TO WHICH THESE PARAMETERS APPLY. THIS REGISTER IS WRITE ONLY. 


BITS DESCRIPTION 


00-01 CHARACTER LENGTH 
THESE BITS SHOULD BE SET AS SHOWN TO RECEIVE AND TRANSMIT CHARACTERS OF THE LENGTH (EXCLUDING PARITY) SHOWN: * 


BIT 01 00 
o 60 S BIT 
2 & BIT 
1 OQ 7 BIT 
.. - 8 BIT 
02 TWO STOP BITS 


THIS BIT, WHEN SET, CONDITIONS A LINE TRANSMITTING WITH 6, 7, OR 8-BIT CODE TO TRANSMIT CHARACTERS HAVING TWO STOP 
MARKS. IF THE LINE’ IS TRANSMITTING 5-BIT CODE, ASSERTION OF tuIS BIT CAUSES THE CHARACTERS TO BE TRANSMITTED WITH 
1.5 STOP MARKS. IF THIS BIT IS NOT ASSERTED, 1 STOP MARK IS SENT. 

03 NOT USED 

04 PARITY ENABLED 


IF THIS BIT IS SET, CHARACTERS TRANSMITTED ON THIS LINE WILL HAVE AN APPROPRIATE PARITY BIT AFFIXED, AND CHARACTERS 
RECEIVED ON THIS LINE WILL HAVE THEIR PARITY CHECKED. 


0S ODD PARITY 
IF THIS BIT AND BIT 4 ARE SET, CHARACTERS OF ODD PARITY WILL BE GENERATED ON THIS LINE AND INCOMING CHARACTERS 
WILL BE EXPECTED TO HAVE ODD PARITY. IF THIS BIT IS NOT SET, BUT BIT 4 IS SET, CHARACTERS OF EVEN PARITY WILL BE 
GENERATED ON THIS LINE AND INCOMING CHARACTERS WILL BE EXPECTED TO HAVE EVEN PARITY. IF BIT 4 IS NOT SET, THE SETTIN 
OF THIS BIT IS IMMATERIAL. 

06-09 RECEIVER SPEED 


THE STATE OF THESE BITS DETERMINES THE OPERATING SPEED FOR THIS LINE’S RECEIVER. THE SPEED TABLE 
BELOW IS APPLICABLE. 


10-13 TRANSMITTER SPEED 


THE STATE OF THESE BITS DETERMINES THE OPERATING SPEED FOR THIS LINE*S TRANSMITTER. THE SPEED 
TABLE ON THE NEXT PAGE IS APPLICABLE. 


SPEED TABLE FOR RECEIVER AND TRANSMITTER SPEEDS: 


BIT 

TRANSMITTER 13 le 
RECEIVER 3 8 

0 0 

0 0 

0 0 

0 0 

0 1 

0 1 

0 1 

0 1 

1 0 

1 0 

1 0 

1 0 

1 1 

1 1 

1 1 

1 1 
14 HALF DUPLEX/FULL DUPLEX 


IF THIS BIT IS SET 
IN FULL-DUPLEX MODE. 


IN THIS APPLICATION HALF-DUPLEX MEANS THAT THE DH11 RECEIVER IS BLINDED DURING TRANSMISSION OF A CHARACTER. 
15 AUTO-ECHO ENABLE 


—-O0r+-O00r+00++-00 


—-O0-0r-0-0r-0r-O0r-O-O 


BO4 


ZERO BAUD 


9600 BAUDS 
EXTERNAL INPUT A 
EXTERNAL INPUT B 


THIS LINE WILL OPERATE IN HALF-DUPLEX MODE. IF NOT SET, THIS LINE WILL OPERATE 


SEG 0039 


WHEN THIS BIT IS SET, CHARACTERS RECEIVED ON THIS LINE WILL BE HARDWARE ECHOED. SEE THE DISCUSSION OF AUTO-ECHO FOR 


FURTHER DETAILS. 
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5.2.6 


5.2.7 


CURRENT ADDRESS REGISTER ADDRESS x06 
ern te ee ee SEQ@ 0040 


THIS BEGISTER sage BE LOADED ONLY AFTER THE SYSTEM CONTROL REGISTER tl ice HAD THE APPROPRIATE BITS SET TO SELECT THE 
DESIRED LINE NUMBER. WHEN THIS REGISTER IS LOADED, ADDRESS BITS 00-15 ARE TRANSFERRED INTO SEMICONDUCTOR 

MEMORIES IN THE DH11 FROM BITS 00-15 OF THIS REGISTER. ADDRESS BITS 16-17 ARE TRANSFERRED INTO SEMICONDUCTOR 

MEMORIES IN THE DH11 FROM BITS 4-S OF THE SYSTEM CONTROL REGISTER. 


pvene Te a BE INHIBITED OR THE SCR SAVED BETWEEN THE SETTING OF THE SCR BITS O-3 AND THE READ OR WRITE OF THE CURRENT 


WHEN THIS REGISTER IS READ, IT WILL INDICATE THE CURRENT ag: e - LINE SELECTED BY THE SYSTEM CONTROL REGISTER. 
BITS 16 AND 17 WILL APPEAR IN THE SILO STATUS REGISTER, BITS 6 AND 7 


BYTE COUNT REGISTER ADDRESS X10 


IN THE SAME FASHION AS THE LINE PARAMETER AND CURRENT ADDRESS reer eee MTS REGISTER SHOULD NOT BE LOADED OR READ WITHOUT 
FIRST SELECTING A LINE NUMBER BY MEANS OF THE LOWER-ORDER FOUR B F THE SYSTEM CONTROL REGISTER. THIS REGISTER SHOULD BE 
LO PERO NTE. TWO’S COMPLEMENT OF THE NUMBER OF CHARACTERS (BYTES) ‘fo BE PRANSMITTED ON THAT LINE. THE BYTE COUNT REGISTER 


ENTER Te ust BE INHIBITED OR THE SCR SAVED BETWEEN THE SETTING OF THE SCR BITS O-3 AND THE READ OR WRITE OF THE BYTE 


BUFFER ACTIVE REGISTER (BAR) ADDRESS Xle 


THIS REGISTER CONTAINS ONE Bir FOR EACH LIN. THE BITS ARE INDIVIDUALLY SET USING BIS INSTRUCTIONS. SETTING A BIT INITIATES 
TRANSMISSION ON THE tee D LINE. THE BIT IS CLEARED BY THE HARDWARE WHEN THE LAST CHARACTER TO BE TRANSMITTED 
IS LOADED INTO THE TRANSMITTER DATA HOLDING REGISTER OF THE UART FOR THAT LINE. IT SHOULD BE NOTED THAT WHILE 
THE CLEARING OF A BAR DOES INDICATE THAT A MESSAGE MAY BE SENT, IT DOES NOT INDICATE THAT THE LAST CHARACTERS 
FROM THE PRECEDING MESSAGE HAVE BEEN COMPLETELY SENT. Bence ONE " te CHARACTERS WILL BE SENT AFTER THE BAR 
BIT CLEARS. THESE ARE THE LAST TWO CHARACTERS OF THE bars one OF ae a Berane WHEN THE BAR WAS be reeD 
Re Mie (Oe bitc SRE rte the Te cea el eae teins Geet ates 
WANT 0 URITE PROGRAMS THAT CONTROL SUCH MODEM L Abe ARE oR T TO HD cy: T | SEND (RIS, SHOULD NOT BE 
DROPPED UNTIL AT LEAST TWO CHARACTER TIMES BFTER THE BAR BIT FOR A GIVEN LINE CLEARS 


THIS TIMING MAY BE EFFECTED BY SENDING TWO EXTRA (NULL) CHARACTERS IN A MESSAGE AND DROPPING RTS WHEN BAR CLEARS. 


CLEARING A BAR BIT SHOULD NOT BE_USED TO ABORT TRANSMISSION ON A LINE. RATHER, THE BYTE COUNT FOR THAT LINE SHOULD BE SET 
TO ZERO. THE BUFFER ACTIVE REGISTER BITS ARE READ/WRITE. 


BREAK CONTROL REGISTER ADDRESS X14 


THIS REGISTER CONTAINS ONE BIT FOR EACH LINE. SETTING A BIT IN THIS REGISTER WILL IMMEDIATELY GENERATE A BREAK CONDITION 
ON THE LINE CORRESPONDING TO THAT BIT NUMBER. CLEARING THE BIT WILL TERMINATE THE BREAK CONDITION. THE BREAK CONDITION 
MAY BE TIMED BY SENDING CHARACTERS DURING THE BREAK INTERVAL, SINCE THESE CHARACTERS WILL NEVER ACTUALLY REACH THE LINE. 
FURTHER COMMENTS CONCERNING THE TRANSMISSION OF BREAK SIGNALS MAY BE FOUND IN THE BREAK SIGNALS SECTION. 


5.2.8 


DO4 


SILO STATUS REGISTER ADDRESS X16 


wanna nn nanan nana nanan SEG 0041 


THIS REGISTER IS ACTUALLY TWO BYTE-SIZED REGISTERS. THE BIT ASSIGNMENTS ARE: 


BIT 


00-05 


06-07 


08-13 


DESCRIPTION 


SILO ALARM LEVEL 


THE PROGRAM MAY LOAD AN INTEGRAL POWER OF 2 BETWEEN 0 AND 63 INTO THIS LOCATION (E.G 16, OR 32). 
WHEN THE NUMBER OF CHARACTERS STORED IN THE SILO EXCEEDS THAT NUMBER, AN INTERRUPT “Reaueér! tseereh Sant BOL 
REGISTER BIT 7) IS GENERATED, IF SYSTEM CONTROL REGISTER BIT 6 IS SET. THESE BITS ARE READ/WRITE. 


READ EXTENDED MEMORY 


THESE BITS ARE READ ONLY AND CONTAIN THE Al& AND Al7 BITS OF THE CURRENT LINE ADDRESS WHICH THE LINE 
SELECTION BITS OF THE SYSTEM CONTROL REGISTER ARE POINTING. 


SILO FILL LEVEL 


THESE BITS ARE AN UP-DOWN COUNTER THAT INDICATES THE ACTUAL NUMBER OF CHARACTERS IN “=. a? IT SHOULD 
BE NOTED THAT THERE ARE SIX BITS, HENCE NUMBERS gg OS O AND 63 CAN BE REPRESENTED. L SILO ta. 64 
ENTRIES AND THE FILL LEVEL APPEARS AS 00000, BUT ONE MAY EASILY TELL THE DIFFERENCE BETHEEN AN EMPTY 
hate Ett ee tee a (00000) BY CHECKING THE STORAGE OVERFLOW BIT (BIT 14 OF SYSTEM CONTROL). 


c.3 DH11 MODULE ALLOCATION CHART 
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FIGURE 2-4 OH11 MODULE UTILIZATION DIAGRAM 
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NOTES: 
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Page 2 


If end of bus, replace M920 with M930. 


If last unit in basic box, replace M920 with BCLIA cable when 
expanding to peripheral box. 


If first unit in expander box, replace M920 with BC1IA cable. 
E02 must be G727 grant continuity if modem control module set 
is not installed. * denotes Omi1-BB modem control option, 
with DH11-AA or AC 

Module slots provide for additional clock rates. 


be) ; Siagaestie checkout of DH11-AA, AB, or AC, replaces M971 


This slot contains Modem Contro] Module M7807 with DH11-AD. 
This slot contains Modem Control] Module M7808 with Dhll-ad. 


This slot contains EIA Converter and Priority Module M5906 
for DHI1-AD or AE. 
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MAINTENANCE PROCEDURES 


ING =DZDH FOR BATTEN ace A Bema He al FOR 
it ray wah lien hi Does ot ca at POSSIBLE 
ALSO RUN TE ora GNOSTI , MD- tote PRIOR 


10 
USING THIS PROGRAM TO INSURE’ COMPLETE CHECKOUT AND VERIFI- 
CATION OF THE DH11 HARDWARE. 


MAINTENANCE CONNECTORS 


BOTH THE DATA RELIABILITY AND PATTERNS/CABLE SUB- 
PROGRAMS REQUIRE THAT THE USER INSTALL THE APPROPRIATE MAINTEN- 
ANCE JUMPERS OR MODULES BEFORE RUNNING THE PROGRAM. DEPEND- 

ENT UPON THE SPECIFIC DH11 CONFIGURATION AND THE TYPE OF TEST- 
ING DESIRED, CERTAIN MAINTENANCE AIDS MUST BE 
INSTALLED AS OUTLINED BELOW: 


A. DH11-AA, AB, OR AC CONFIGURATIONS 


1) TESTING LOGIC FOR ALL LINES WITHOUT DATA CABLES 
OR LEVEL CONVERTERS 


A. ae 3 DATA RABLE FROM SLOT B7 IN EACH 
B. INSTALL AN M974 MAINT JUMPER MODULE INTO 
SLOT B7 OF EACH DH11 TO BE TESTED. 


2) TESTING ALL 16. LINES INCLUDING DATA CABLES 
WHICH CONNECT TO DISTRIBUTION PANEL. DOES NOT 
TEST LEVEL CONVERTER CIRCUITS LOCATED IN DIS- 
TRIBUTION PANEL. 


A. INSTALL THE M974 MAINT JUMPER MODULE INTO SLOT B3 
OF THE MULTIPLEXOR DISTRIBUTION PANEL FOR EACH 
DH11 TO BE TESTED. 


3) TESTING ONE OR MORE SINGLE LINES INCLUDING EIA LEVEL 


CONVERTERS AND DEVICE CABLES WHICH ARE NOT TESTED 
IN 1 AND 2 ABOVE. 


a. INSTALL AN H31S TEST CONNECTOR AT THE END OF THE 
DEVICE CABLE FOR EACH LINE TO BE TESTED. 
B. DH11-AD CONFIGURATION 
1. TESTING ALL 16. LINES WITHOUT DATA CABLES 
A. DISCONNECT THE DATA CABLES (2) FROM THE TWO 
CONNECTORS ON THE MS906 MODULE (SLOT AB7 OF 
THE DH11 BACKPLANE. 


B. INSTALL TWO H8611 TEST CONNECTORS ON THE MS906 
IN PLACE OF THE CABLES. 


&. TESTING ONE OR MORE SINGLE LINES INCLUDING DATA CABLES 


SEQ OO44 


HO4 


A. DISCONNECT THE DEVICE CABLE FROM THE DH11-AD 
DISTRIBUTION PANEL FOR EACH LINE TO BE TESTED. 


B. INSTALL AN H31S TEST CONNECTOR IN ITS PLACE 
ON THE DH11-AD DISTRIBUTION PANEL. 


NOTE: TO TEST THE DEVICE CABLE AS WELL, INSTALL 
THE H31S TEST CONNECTOR AT THE END OF THE 
DEVICE CABLE AND LEAVE THE DEVICE CABLE 
CONNECTED TO THE DISTRIBUTION PANEL. 


6.2 DATA RELIABILITY TESTING 


A. COMPLETE RELIABILITY TESTING (OVER NIGHT RUNS) 


1) SET UP THE TEST JUMPERS AS REQUIRED FOR THE 4) eee 
CONFIGURATION TO BE TESTED. (REFER TO PARA {ms 

2) LOAD MD-DZDHN AND START IT AT LOC O00200( 

3) TYPE IN THE DESIRED wil PARAMETERS - SET THE SR=000200 
AND LET THE PROGRAM RUN 


A COMPLETE TEST RUN FOR 16. LINES ON EACH DH11 WILL 
TAKE APPROX 4 HOURS (TWO DH11’S WOULD TAKE 8. HOURS) ETC. 


AT THE COMPLETION OF TESTING FOR EACH DH11 THE ERROR 
STATISTICS TABLE WILL BE TYPED OUT. 


LET THE PROGRAM RUN AT LEAST 7 PASS (4 HRS/DH11) 
PREFERABLY OVERNIGHT, AND THEN ANALYZE ANY ERROR 
PRINTOUTS AND THE ERROR STATISTIC TABLE DATA. 
IF ERRORS OCCUR IT oo BE ee FOR THE USER TO 
DETERMINE WHICH LINE, WHICH DH11, AND THE FAILING MODES. 
OF OPERATION TO AID tn’ FAULT ISOLATION. 


B. QUICK DATA RELIABILITY TESTING 


1) FOLLOW THE SAME PROCEDURE AS IN PARA 6.2(A) ABOVE EXCEPT 
SET THE SR=000000(8) BEFORE STARTING THE RUN. 


THE QUICK TESTS VERIFY ALL cone TNT TONS OF LINE 
PARAMETERS ON ALL LINES AT 9600. BAUD ONLY. ALL 
OTHER BAUD RATES ARE TESTED WITH 5 BIT CHARS, 
ONE STOP BIT, AND ODD PARITY ONLY. 


THE QUICK TEST TAKES APPROX. 15 SECONDS PER LINE SO 
§ iy 16. LINES) COULD BE TESTED IN APPROX 


Q 


a 


5 


-_ 


2 


_ 


3) THE ERROR INFORMATION PROVIDED IS IDENTICAL TO THAT 
OrcuRe COMPLETE TEST EXCEPT LESS TOTAL DATA TRANSFERS 


6.3 DATA PATTERNS TESTING 


THE DIAGNOSTIC, MD-11-DZDHM, AND THE DATA RELI- 
ABILITY TESTS USE ONLY'A BINARY UP COUNT PATTERN FOR DATA 
TESTING WITH A MAXIMUM BUFFER SIZE OF 256. BYTES. TO PRO- 


SES S045 


y106 pire DATA PATTERNS, THE USER CAN RUN THE DATA 
TTERNS/CABLE TESTS. THESE TESTS ALLOW HIM TO SIT AT THE 


BARANETERS, DATA PATTERNS, BUFFER Srdes, ert. “Yuu 


1) SET UP THE TEST arrs FOR THE LINES TO BE TESTED AS 
DESCRIBED IN PARA 6.1 


2) LOAD MD-11-DZDHN AND START IT AT LOC 000220(8) 
TO RUN THE DATA PATTERNS TESTS. 


3) REFER TO PARA 2.1.2.3 FOR THE OPERATING INSTRUCTIONS. 


4) ONCE A FAILING PATTERN TEST IS FOUND, THE USER CAN 
RECONFIGURE THE TEST JUMPERS TO ISOLATE THE FAULT TO 
EITHER THE DH11 OR A FAULTY CABLE AND/OR CONNECTOR. 


ECHO TESTING 


THESE TESTS ALLOW THE USER TO CONNECT AN i teem 
TERMINAL TO THE DH11 DISTRIBUTION PANEL AND VERFIFY_ THE 
PARTICULAR LINE AS IT MIGHT BE USED ON-LINE. REFER TO 
eae § 2. pdee- -2 FOR THE OPERATING INSTRUCTIONS FOR THE DH11 


t 
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JO4 


THIS IS A HISTORY FILE OF THE DEVELOPMENT OF MD-11-DZDHN 
PRODUCT CODE: MD-11-DZDHN VERSION 000.000 


PRODUCT NAME: H11 DATA RELIABILITY EXERCISER AND 
STNG LINE ECHO/CABLE TESTS 


RELEASE DATE: JANUARY 1976 
AUTHOR: ED CROWLEY 
RHEE RARER EE LE EEE EER KERR RAKE EER EEE EEE EERE ERE 


PROCUCT CODE: MD-11-DZ9HN-B (REV B) 


PRODUCT NAME: DH11 DATA RELIABILITY EXERCISER AND 
SINGLE LINE ECHO/CABLE TESTS 


RELEASE DATE: SEPTEMBER 1976 

SUBMITTED BY: PAUL F. CANTIN 

EEELELE 

PROGRAM CHANGES: 
i. & Pett ) Or Loe a thee HAS BEEN rei AND INSERTED 
INTO THE PROGRAM MAKE IT CHAINABLE UNDER ACT AN 
CODE WAS ALSO INSERT ED TO LOAD AND RUN NON-CONTIGUOUS DH11 
ADDRESSES WITHOUT OPREATOR INTERVENTION. 
Rey oe UPDATED TO USE SWITCHLESS FEATURE IN SYSMAC 


3. THE SENSE OF SRO7 HAS BEEN REVERSED SO THAT WITH ALL 
tae ai THE PROGRAM PERFORMS A QUICK VERIFY PASS ON 


4. THE “HALT AFTER PARAMETER SETUP” OPTION SHOULD BE 
CONTROLLED BY A SWITCH OTHER THAN CODING HAS BEEN 
CHANGED TO SENSE SROS FOR THIS OPTION 

DOCUMENT CHANGES: 
1. FLOW CHARTS DELETED FROM DOCUMENT. 
C. REFERENCES TO “WORDS BETWEEN VECTORS (4(8) OR 10(8))” 
HAVE BEEN CHANGED TO “ADDRESSES BETWEEN VECTORS (10(8) OR 
20(8))", WITH APPROPRIATE CODING CAHNGES. 
3. PARAGRAPH ON SWITCHLESS FEATURE INSERTED. 
4. AUTOSIZER STARTING PROCEDURE INSERTED. 
S. MADE SEVERAL ADDITIONS TO SECTION 6.1 FOR CLARITY. 


EEEZEEEERELEELEEEEEEEEELELELEL ELL LEE REL REESE EL REEEEL RARER ELLER EKER 
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000046 
oo00Se 


o000e4 
000044 


o00050 


165000 


000001 


000000 


000000 


000000 


MACY11 27(732) 


LOY 


27-SEP-76 16:09 PAGE 4 


-NLIST CND,MD,MC 
“LIST _TOC;ME, SEQ, BIN 


$SWR=1650 
-MCALL , ADER, .SCMTAG, . SETUP, . SER 
-MCALL - SURAT, :SWRLO, . SCATCH, -E gure, "SETUP, . SEOP, GETSWR 


att ee sis sale .STYPDEC, .STYPE, . SPOWER, . STRAP 
M -$ACTII; Clan Etats . SAPTYPE 


-ENABLE ABS 
- TITLE art ali 
;*COPYRIGHT (C) 1976 
; #DIGITAL EQUIPMENT CORP. 
MAYNARD, MASS. 01754 
eos BY ED CROWLEY 
; #THIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
jee (MAINDEC-11-DZQAC-Ce), SEPT 14, 1976. 


if, N=l 
.SBTTL OPERATIONAL SWITCH SETTINGS 


ia SWITCH USE 

+ 1s ‘GOP ON ERROR 

°% 

tx 13 IN Hitt LEB Op TYPEOUTS 
+ TERATION 


9 LOOP ON ERROR 
‘SerTe ACT11 HOOKS 


© RHEL K ALKA LHASA ARREARS RARER SA KRHA RELA SALA AA ALE SAASLAARLAXALEE 
: HOOKS "gece, BY ACTL1 


4 ;SAVE PC 
i2ogoo 5;1)SET LOC.46 TO ADDRESS OF 120900 
“WORD O ;32)SET LOC.52 TO ZERO 
tt RESTORE PC 


. =$SVPC 
.SBTTL APT PARAMETER BLOCK 


ep gE EE ITT OE 2 enna aaa 
SET LOCATIONS 24 AND 44 AS REQUIRED FOR A 
oe AESSSELSUEESEESEREEEESSHOESSASERESETATELAAAENAEAAEEEEEEEEEOEA 
-SX=. ;;SAVE CURRENT LOCATION 
-=24  33SET POWER FAIL TO POINT TO START OF PROGRAM 
200, 7 iFOR APT START 
;;POINT TO APT INDIRECT ADDRESS PNTR. 
SAPTHOR yet TQ APT HEADER BLOCK 
$x ;RESET LOCATION COUNTER 
TT eT Prete tee ePentT re eee er renner TTT eee e rte 
SETUP APT one er BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 


SAPTHD: 
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ea ett ae 
DZDHNB .P 


oo00l2 


000174 
000176 


000220 


MACY11 27(732) 
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000000 


000174 
000000 
000000 


000137 016166 


000137 001626 
000137 pie 00 
000137 

000137 006106 
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sure : - WORD 


SUNITM: - HORD 


MO4 


33 TWO Ee OF 


8 BIT MOT LBOX ADDR. 
Opn 


Aer oe ee (BITS 0-15) 


:tRUN orcs. ‘oF isT PASS ON 1 UNIT (QUICK VERI 
‘ADDITIONAL NUN TIME (SECS) OF A pass FOR EACH ADDIT 


ORD 1008 0 hihOd ;sLENGTH MAILBOX-E TABLE (WORDS) 
.SBTTL TRAP CATCHER 


=0 
;*ALL UNUSED LOCATIONS FROM 4 - 776 CONTAIN c. ".+2,HALT” 
: SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 

; XLOCATION O CONTAINS O TO CATCH IMPROPERLY LOADED VECTORS 


=174 
DISPREG: .WORD 0 


SWREG: _.WORD O 
-SBTTL STARTING ADDRESS(ES) 
J d#INPARX 


O#BEGIN 


8 
O#EXPAT 


;; SOFTWARE DISPLAY REGISTER 
;; SOFTWARE SWITCH REGISTER 


;;JUMP TO STARTING ADDRESS OF PROGRAM 


;BEGIN EXECUTION WITH DEFAULT PARAMETERS 
et pORAME TER Ho § VICE SELECTION ONLY 
TART LINE E 
0 START DATA PATTERNE TESTS 


Au 
ION 


SEG 0050 


AL UNIT 


MAINDEC-11-DZDHN-B 


DZOHNB.P11 


SHOU RL Dow w Qowe 


001100 


000011 
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-SBTTL BASIC DEFINITIONS 
REINT TIAL GRORESS OF THE STACK POINTER *### 1100 *%# 
Stack= 110 


-EQUIV EMT,ERROR ;BASIC DEFINITION OF ERROR CALL 
-EQUIV I0T, SCOPE ; }BASIC DEFINITION OF SCOPE CALL 


* sae | ee waht 


ATs 3s CODE F FOR HORIZONTAL TAB 
CR= i $3 ¢90 E ae ett 
CRLF= 200 ODE FOR CARRIAGE RET URN-LINE FEED 
PS= 177776 +S PROCESSOR STATUS WORC 
EQUIV PS.PSW 
STKLMT= 177774 ;;STACK LIMIT REGISTER 
PIRQ= 177772 *PROGRAM INTERRUPT REQUES’ REGISTER 
DSWR= 177570 *:HARDWARE SWITCH REGISTER 
DDISP= 177570 HARDWARE DISPLAY REGISTER 
-¥GENERAL PURPOSE REGISTER (DEEINITIONS 
eos GENERAL REGISTER 
Re= te i cnet RECIeTER 
R3= %3 :GENERAL REGISTER 
R4= “4 ::GENERAL REGISTER 
RS= 4S ::GENERAL REGISTE 
Rb= “5 : GENERAL REGISTER 
R7= “7 ?: GENERAL REGISTER 
SP= “~% ::STACK POIN 
Pc= “7 : : PROGRAM USER 
-¥PRIORITY LEVEL DEFINITIONS 
Pro= OO ;;PRIORITY LEVEL 0 
PRi=z 40 ::PRIORITY LEVEL 1 
PR2= 100 ::PRIORITY LEVEL : 
PR3= 140 :iBR ORITY LEVEL 
PR¥= 200 PRIORITY LEVEL 4 
Beez Sag PRIORITY LEV 
PR7= 3 Hee ity LEY EL : 
-¥"SWITCH REGISTER” SWITCH DEFINITIONS 
éwiS= 100000 
eae 
SWis= T0000 
SWil= 4000 
SWid= 2000 
SWO9= 1000 
SWwO8= 400 
SwO7= 200 
= 100 
SWOS= 40 
SWO4= 20 
= 10 
-SWO2= 4 
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oo00de 
090001 


100000 


000001 


000004 


000240 
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SWOl= 2 


“EQUIV WOO} SWO 
- xDATA BIT DEF INITIONS (BITOO TO BITIS) 


BITIS= 100 
BIT14= 4o00 
BIT13= 20000 
BITl2= 10000 
BITii= 4000 
BIT10= 2000 
BITO9= 1000 
BITO8= 400 
BITO7= 200 
BITOb= 100 
BITOS= 40 
BITO4= 20 
BITO3= 10 
BITO2= 4 
BITOl= 2 
BITO0= 1 
“EQUIV BITO 
“EQUIV BITO 
EQUIV BITO 
EQUIV BITO 
EQUIV BITO 
EQUIV BITO 
EQUIV BITO 
EQUIV BITO 
EQUIV BITO 
EQUIV BITO 
é 
RESVEC= 10 
TBITVEC=14 
TRTIVEC= 14° 
TVEC= 14 
IOTVEC= 
PWRVEC= 24 
TVEC= 30 


EM 
9 na 2 
TKVEC= 60 


TPVEC= 64 
PIRQVEC=240 


1 
-EQUIV SWO9,SW9 
8, SW8 


O-NOLMOTIDD 
DWDWDMDMDMWMWMWMW 
bt 4 4 4 4 tt 
AAAS 
O-MW CUIT N00 


[RPERS y “CPU” TRAP VECTOR TINE GUT 


ME OUT AND OTHER ERRORS 
ne AND ILLEGAL INSTRUCTIONS 


3; TRACE TRAP 

:;BREAKPOINT TRAP (BPT) 
j INPUT /QUTPUT TRAP (IOT) **SCOPEX# 
i STRAP TR ba (EMT) **ERROR#* 
ssTTY KEYBOARD VECTOR 


3; TY PRINTER VECTOR 
;;PROGRAM INTERRUPT REQUEST VECTOR 


SEG 00Se 


COS 
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DZDHNB.P11 COMMON TAGS SEQ 0053 

194 .SBTTL COMMON TAGS 

196 F 5 RHR RLA ELLA ERE A ERA EEE EAE RHEE ERLE EAE ER AEE RARE RRER SEE EEEE 

197 ATs TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 

| 33g 001100 =1100 

201 001100 SCMTAG: -— START OF COMMON TAGS 

202 001100 oop0000 .WORD O 

503 Bott - aere: cByIE tT EONTAING ERROR PLAGE 

Soe 001108 900000 Sica, WORD s CONTAINS SUBTEST JTERETION want: 

207 001110 000000 SLPERR: .WORD 0 CONTAINS SCOPE RETURN FOR ERRORS 

5o9 DOLLIa oon STTENB, “BYTE. 0 tS CONTAINS TEN CONTROL. BYTES 

210 001115 001 SERMAX: .BYTE 1 $3 AINS MAX. ERRORS PER TEST 

211 001116 co0000 SERRPC: :WORD O PC OF LAST ERROR INSTRUCTION 

sem ae OMAR (BRSESS OF 28° of 

214 001124 o00000 SGDDAT: :WORD 0 t CONTAIN *GO0D’ DAT 

215 000000 SBDDAT: .WORD 0 ‘CONTAINS ’BAD’ DATA 

16 001139 goog - WORD - t  RESERVED--NOT TO BE USED 

218 001134 000 SAUTOB: .BYTE 0 s sAUTOMATIC MODE INDICATOR 

219 001135 nooo SINTAG: -BYTE : : INTERRUPT MODE INDICATOR 

221 001140 177570 SWR “WORD DSWR ; ADDRESS OF SWITCH REGISTER 

gee 001148 177570 DISPLAY: HOR DDISP Hua ey OF que REGISTER 

224 O01146 177562 $TKB: 177562 itty 

ee pet irae ties: Here aR CTS SD somes 
001154 "BBB Me i: LeaaE 0 js CONTAINS NULL CHARACTER FOR FILLS 

opie oe ite “Be fe TAREE fs aed SPATE ERLE 

230 001157 000 STPFLG: .BYTE 0 js TERMINAL AV AVAILABLE” FLAG (BET 7) SBOYES) 

231 001160 oo0000 SREGAD: .WORD 0 *:CONTAINS THE ADDRESS F 

535 62 000000 SREGO: .WORD 0 + MONTAINS ¢ fSREGAD) 403 GeihineD 

234 001164 o00000 SREGi: .WORD 0 :: CONTAINS ((SREGAD) 42) 

se Bliss EER ee: 8 HeOMane ((BEgB)s3 

237 001172 00000 SREGY: .WORD 0 CONTAINS (($REGAD)+10) 

238 001174 p9900 SREGS: .WORD 0 ::CONTAINS ((SREGAD) +12 

239 001176 O000 SREGb: .WORD O CONTAINS (($REGAD) +14) 

240 001200 o00000 SREG7: .WORD 0 ::CONTAINS (($REGAD) +16) 

241 O01e02 oo0c00 STMPO: .WORD O :USER DEFINE 

4D 04 oo0000 STMP1: <:WORD 0 USER DEFINED 

243 001206 000000 STMP2: :WORD O USER DEFINED 

244 001210 000000 STMP3: .WORD 0 USER DEFINED 

24s 000000 STMPY: “WORD 0 USER DEFINED 

246 00 000000 STMPS: :WORD 0 USER DEFINED 

247 001216 00000 STHPe: “WORD 0 :USER DEFINED 

248 001220 000000 0 ::USER DEFINED 


STMP7: .WORD 
245 OOlece ooo000 STINES: 6 ::MAX. NUMBER OF ITERATIONS 
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OZDHNB.P11 COMMON TAGS 
250 001224 oo000 SESCAPE:0 ; ESCAPE ON ERROR ADDRESS 
se BB tS5¢ B09 SQUES: .ASCII /?/ ::QUESTION MARK 
252 001227 O15 SCRLF: .ASCII <1S> : CARRIAGE RETURN 
253 001230 oo001e2 SLF: “ASCIZ «12> *?1 INE FEED 
254 33 SETTTTTSTSSOCTSTOCT OCTET TT TTT TESTS TESST TT TT TT TTT TTT TTT tte 
eb ’SBTTL APT MAILBOX-ETABLE 
S20 3 HSH AK HEH LLL L AHH KSLA SSR ESSER ALEK EKA EAA L ALLAAH RELA AKL LEL ELE 
259 001232 SMAIL: : APT MAILBOX 
260 OOle32 oo0000 SMSGTY: .WORD AMSGTY ::MESSAGE TYPE CODE 
261 001234 oo0000 SFATAL: .WORD AFATAL ;:FATAL ERROR NUMBER 
262 001236 o00000 STESTN: .WORD ATESTN ;;TEST NUMBER 
263 001240 000000 SPASS: .WORD APASS ;::PASS COUNT 
264 OOle42e oo0000 SDEVCT: :WORD ADEVCT ;: 
265 001244 00000 SUNIT: .WORD UNIT 3170 UNIT NUMBER 
266 001246 00000 SMSGAD: .WORD  AMSGAD ; MESSAGE ADDRESS 
267 001250 o00000 SMSGLG: :WORD AMSGLG ;;MESSAG TH 
268 001252 SETABLE APT ENVIRONMENT TABLE 
269 00 000 BYTE AENV  ;:ENVIRONM 
270 001253 BYTE NVM :ENVIRONMENT MODE BITS 
271 001254 oo0000 SSWREG: :WORD ASWREG ;;APT SWITCH REGISTER 
272 001256 op0000 SUSWR: <:WORD AUSWR  ;;USER SWITCHES 
273 001260 op0000 SCPLUOP: :WORD ACPUOP ::CPU TYPE,OPTIONS 
274 ro BITS 15-11=CPU TYPE 
575 11704201, 117/05=02, 11/20=03, 11/40=04, 11/45=05 
276 2 11/70=06,PDQ=07, 0=10 
277 x BIT LO=REAL TIME’ CLOCK 
278 1% BIT 9=FLOATING POINT PROCESSOR 
279 + BIT @=MEMORY MANAGEMENT 
280 001262 00 $MAMS1: .BYTE AMAMS1 ;;HIGH ADDRESS,M.S. 
281 001263 000 SMTYP1: .BYTE AMTYP1 :: PE BLK#l 
282 # MEM. TYPE BYTE -- (HIGH BYTE) 
283 : 900 NSEC CORE= 
ogy 1 ¥ 300 NSEC BIPOLAR=002 
285 ty SOO NSEC MOS= 
286 001264 oo0000 $MADR1: .WORD AMADRI ;;HIGH ADDRESS, BLK#l 
287 + MEM.LAST ADDR.=3 BYTES,THIS WORD AND LOW OF “TYPE” ABOVE 
288 001266 00 $MAMS2: .BYTE AMAMS2 ;;HIGH ADDRESS,M.S. BYTE 
289 001267 000 SMTYPe: .BYTE AMTYP2 ::MEM. TYPE, BLK 
290 001270 coDD00 SMADR2: .WORD MADR ;:MEM.LAST ADDRESS, BLK#e 
291 001272 000 SMAMS3: .BYTE AMAMSS ;;HIGH ADDRESS,M.S.BYTE 
292 001273 000 SMTYP3: .BYTE AMTYP3 :;MEM.TYPE,BLK#3 
293 001274 00000 $MADR3: .WORD AMADR3 ;;MEM.LAST ADDRESS, BLK#3 
294 001276 000 SMAMS4: .BYTE AMAMSY ::HIGH ADDRESS,M.S.BYTE 
295 001277 000 SMTYP4: [BYTE AMTYPY :;MEM 
001300 00000 SMADR4Y: .WORD AMA ::MEM.LAST ADDRESS, BLK #4 
297 001302 000000 SVECT1: :WORD AVECT1 ::INTERRUPT VECTOR#1, BUS PRIORITY#! 
298 001304 900000 SVECT2: :WORD AVECT2 ::INTERRUPT VECTOR#2BUS PRIORITY#e 
293 001306 000000 $BASE: .WORD ABASE ;;BASE ADDRESS OF EQUIPMENT UNDER TEST 
300 001310 000000 SDEVM: :WORD ADEVM ;:DEVICE MAP 
301 601312 000000 SCDW1: :WORD ACDWL  ::CONTROLLER DESCRIPTION WORD#1 
302 001314 o00000 SCDW2: :WORD ACDW2  ;:CONTROLLER DESCRIPTION WORD#2 
303 001316 900000 SDDWO: .WORD ADDWO ;:DEVICE DESCRIPTOR WORD#O 
204 001320 600000 SDDW1: :WORD ADDWL  $:DEVICE DESCRIPTOR WORD#1 


305 O00l3ee 000000 $D0We: .WORD ADDWe ;;DEVICE DESCRIPTOR WORD#e 


MAINDEC-11-DZDHN-B 
DZOHNB.P11 


309 
08 


be 


001330 


l 
001352 
001354 


001356 


000000 


SDDW1S: . 


SETEND: 


“HERB 


. WORD 
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APT MAILBOX-ETABLE 


ADOW1S 


EQS 


10 


‘iDEVISE BESERIPTOR WORDS 


;DEVICE DESCRIPTOR WORD#S 


ae TEE BESERIBTSR HORDE? 


ee BESGHIETS 1B 


ICE DESCRIPTOR WO 
i SDEVICE DESCRIPTOR WORDSIS 


DESCRIPTOR W 


DESCRIPTOR 


Q eg DESCRIPTOR ert 


BH 
RD#1 


SEG cOss 


MAINDEC-11-DZDHN-B 
OZDH 


NB.P11 


001356 


001356 


Boise 


001364 


001366 


001374 


001376 


001414 


001416 


001424 


001426 
001430 
001432 
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ERROR PCINTER TABLE 


022442 


Osseee 


022604 


022614 


022604 


022673 


022604 


022753 


022604 


023030 
Oees11 
O2eSbE 
022604 


023112 
022511 
Oeesté 


FOS 
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SEQ 0056 


-SBTTL ERROR POINTER TABLE 
;*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 


:¥THE INFORMATION IS OBTAINED 
sm ea Lon ahah THIS NUMBER INDICATES WHICH ITEM IN 


; *NOTE1 
: ¥NOTE2: 


SERRTB: 


BY USING THE INDEX NUMBER FOUND IN 

N THE TABLE IS PERTINENT. 

IF SITEMB IS O THE ONLY PERTINENT DATA IS ( ). 

EACH ITEM IN THE TABLE CONTAINS 4 POINTERS. EXPLAINED AS FOLLOWS: 


Ron Oe eR ence 


;ERROR TABLE ITEM FOR ERROR 1 


;"NON EX MEMORY ERROR - DROPPED LINE & ™ 


mgt anb CURLER sReCl. PgRece, RECS, HPs, 
;PRINT ALL OC 


S/B" 


;ERROR TABLE ITEM FOR sreon 2 


j A TRANSMITTER FALSE INTERRUPT - DROPPED LINE® ” 
(PC}  CURLPR DEVADR REGADR WAS S/B" 

 SERRPC CURLPR, SREG1, SREG2, SREG3, SREGH 

*PRINT ALL OCTAL 


;ERROR TABLE ITEM FOR ERROR 3 


Fahy ACTIVE tet ets wes - — Lm ss 


CURLPR evade. 8 r 
im gERKPC CURLPR SREEL REGe, eeReC3, SRECH 
‘PRINT ALL OCTAL 


;ERROR TABLE ITEM FOR ERROR 4 


;"BYTE COUNT REGISTER ERROR - DROPPED LINE # " 
¢) CUR DEVADR REGADR WAS ean 

t  GERRPC CURLER SREG1, SREG2, SREGS, SREGY 

:PRINT ALL OCTAL 


;ERROR TABLE ITEM FOR ERROR 5 


; NCURRENT ADDRESS REGISTER ERROR - DROPPED LINE a ™ 
(PC) CURLPR DEVADR REGADR WAS $/B" 

S  gERRPC CURLER, SREG1, SREG2, $REGS, SREGY 

PRINT ALL OCT 


;ERROR TABLE ITEM FOR ERROR 6 


7 SILO OVERFLOW ERROR - DROPPED LINE # ™ 
RLPR DEVADR REGADR WAS 
"SERRPC, CURLPR, SREG1, SREG2, SREG3, SREGY 


$78” 
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001434 


001436 
001440 


potas 
O1446 


001454 


0014S6 
Boluee 


001464 


001466 


001514 


001516 
001520 
001522 
0015e4 


potees 
1530 
001532 


MACY11_e7(732) 
ERROR POINTER TABLE 


022604 


023161 


023235 
023305 
023372 
022604 


023412 


Oeas7e 


022604 


023440 


022604 


000000 


023602 


023612 
023637 
023706 
022604 


023750 
024022 
024102 


GOS 
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DFe 
;ERROR TABLE 


EM7 
pal 
Bre 


;ERROR TABLE 


;ERROR TABLE 


0 
0 
OT4 
DF 1 


;ERROR TABLE 


:PRINT ALL OCTAL 
ITEM FOR ERROR 7 
a FALSE INTERRUPT - LINE # ” 
PC) CURLPR DEVADR REGADR WAS S/B" 
RRPC, CURLPR, SREG1, SREG2, SREG3, SREGY 
NT ALL OCTAL 
ITEM FOR ERROR 10 


ye ID DATA IN aiL0. - DROPPED LINE & “ 


ASADR SHBADR WAS S/B" 
 SERRPC CUR BR S$REGO, SREGI. SREG2, SREG, SREGY 
:PRINT ALL OCYAL 
ITEM FOR ERROR 11 
ay ar eR he HOR ASADR SHBADR WAS S/B" 
ig PED CURLER, sR GO, sReGi” REG2 Rice SREGY 


:PRINT ALL 0 
ITEM FOR ERROR 12 


5 TEST TIMEOUT - DROPPED LINE # ™ 
CURLPR RTOTAL XTOTAL, RDONE™ 
GE RRPC CURLPR, STMPO, STMP1RDONE" 
:PRINT ALL OCTAL 
ITEM FOR ERROR 13 
;NO MESSAGE 
-NO DATA HEADER 
:STMPO,STMP1,STMP2, STMP3, STMPY, STMPS, STMPS 
*PRINT ALL DECIMAL 
ITEM FOR ERROR 14 


Ma: ERROR TRAP TO 04” 
(PC) PS) PPC TRAPPS” 


(PS) (SP) TRA 
 SERRPC STMPO, SREG6, SREG!, SREG2” 
:PRINT ALL OCTAL 


ITEM FOR ERROR 15 
By tf INSTR_TRAP uP se 
(P APPC TRAPPS” 


( S) 
 SERREC STMPO, SREG6, ‘FREI, ghee’ 
:PRINT ALL OCTAL 


ITEM FOR ERROR 16 
p SINE LINE ECHO TEST - INTR WAIT TIMEOUT” 


LIN SCR) CURLPR EXFLAG” 
 SERREC, SRESI. LINE, $TMPC, CURLPR, EXFLAG” 


0057 
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001534 


001536 
001540 
001542 
001544 


001546 


001SS4 


O1828 


001562 
001564 


001566 


001626 
001630 


ERROR POINTER TABLE 
022604 


024120 
024162 
024232 
022604 


024246 


eter 


022604 


Beales 
024232 
022604 


024354 


022604 


peu4 
416 

024232 
022604 


O244S0 
024162 


Bs2e0s 


024507 
Oe4S4e 
024622 
022604 


005000 
005067 020060 


HOS 
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oF2 :PRINT ALL OCTAL 
sERROR TABLE ITEM FOR ERROR 17 
EMi7 s"ALTERNATING 1/0 PATTERN TEST DONE” 
DH6 (PC) DEVADR LINE  CURLPR ICOUNT” 
O17  SERRPC DHADR, LINE, GURLPR, $REGO 
Fe PRINT ALL 0 
sERROR TABLE ITEM FOR ERROR 20 
EN2O :"BINARY UP COUNT PATTERN TEST DONE NT” 
a ee) oHRDR LI LINE, NE oR, eke abe 
OFe2 :PRINT ALL 0 
sERROR TABLE ITEM FOR ERROR 21 
ay 1 s BINARY DOWN COUNT PATTERN TEST DONE” 
H (PC) DEVADR LINE CUR ICOUNT™ 
017 : SERRPC, DHADR, LINE, CURLPR, SREGD 
OF2. _ _ ;PRINT ALL OCTAL 
sERROR TABLE ITEM FOR ERROR 22 
EMe2 j7RANDON DATA PATTERN TEST DONE” 
DH& (PC) _DEVADR LINE CURLPR ICOUNT” 
O17  SERRPC DHADR, LINE, CURLPR, $REGO 
DFe :PRINT ALL OCTAL 
sERROR TABLE ITEM FOR ERROR 23 
N H B ypart RN T DONE” 
at . ia Noo . B . INE URLPR ICOUNT” 
O17  SERRFC DHADR PP TNE, GURLPR, $REGO 
OF2 ‘PRINT ALL OCTAL 
;ERROR TABLE ITEM FOR ERROR 24 
EM2e4 ;"TYPED BUFFER PATTERN TEST DONE" 
DHb " (PC)  DEVADR LINE  CURLPR ICOUNT™ 
O17 is RRPC, DHADR, LINE, CURLPR, $REGO 
DFe PRINT ALL OCTAL 
sERROR TABLE ITEM FOR ERROR 25 
M2S “DATA PATTERNS TEST TIMEOUT” 
FiNeS 5 OeBe) EVABR ERNE a Rt PR ICOUNT PATCDE™ 
DT10 : SERRPC BEROR RUINE. CRLPR. $REGO, SREG] 
OF2 ‘PRINT ALL OCTAL 
BEGIN: CLR RO : INIT RO TO INDICATE DEFAULT PARAMETERS 
CLR VCFLG ‘INIT VECTOR ADDR SET UP FLAG 


05 
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DZDHNB. P11 ERROR POINTER TABLE SEG 0059 
13) SBIR BBSEE? GEDEQE Cth ARThf © LER PENG SECTERDNLARSR Fa 
493 001644 005067 O20466 BEGINA: CLR TITFLG INIT TITLE MESSAGE FLAG 
494 -SBTTL. INITIALIZE THE COMMON rads 
495 ;;CLEAR THE COMMON TAGS (SCMTAG) AREA 
ies UES Quem oe Sy Hasyn, HFOLan BERGA ott a “ED . 
Waa doles Oe 706 001140 CNP #SWR,R& ;;DONE? ’’ | 
499 001662 001374 BNE 28 LOOP BACK IF NO 
S00 001664 012706 001100 MOV STACK, SP tISETUP THE STACK POINTER 
01 ss INITIALIZE A FEW VECTORS 
S02 001670 012737 011112 oD0020 MOV WSSCOPESHIOTVEC 5; 107 VECTOR FOR SCOPE ROUTINE 
503 001676 012737 000340 o00022 MOV #340, aHLOTVEC+ ae 
S04 001704 012737 011356 000030 MOV HSERROR aENTVEC' “EMT + VECTOR FOR ERROR ROUTINE 
505 001712 012737 000340 0900032 MOV #340, JHEMTVEC+ E 
S06 001720 012737 014326 000034 MOV SSTRAP, JATRAPVEC TRAP {VECTOR FOR TRAP CALLS 
507 001726 012737 000340 000036 MOV —«- #340, DRTRAPVEC+e AT 
508 001734 012737 O14412 O00024 MOV #SPWRON, J#PWRV ee ; pour >FRILURE VECTOR 
ae ee el ne | 
611 001754 p20 7 155545 CLR aree c Be Hen CIEE AURBER, OF ON ERROR ADDRESS 
Si2 001760 112767 000001 177127 MOVE #1, SERNAX :;ALLOW ONE ERROR PER TEST 
513 001766 012767 001766 177112 MOV a. , SLEADR ; FIN NITIAL IZE THE LOOP ADDRESS FOR SCOPE 
514 001774 012767 001774 177106 MOV SLPERR THE ERROR LOOP ADDRESS | 
515 i817 FOR A HARDUARE SWITCH REGLSTER. IF NOT FOUND OR 
516 ‘EQUAL TO A” SETUP FOR of SOFTWARE SWITCH REGISTER. 
517 O02002 013746 000004 MOV’ aRERRV $P) ;SA ERROR VEC TOR 
S18 O02006 012737 o02042 ooD004 MOV #64S ate ERE :iSET UP ERR TOR 
519 002014 O1e767 177570 177116 MOV #DSWR,S ::SETUP FOR A HARDUPRE SUICH REGISTER 
520 002022 012767 177570 177112 MOV sDbis? DISPLAY AND A HARDWARE DISPLAY R 
S21 002030 022777 177777 177102 CMP #-1, ISWR ::TRY TO REFERENCE HARDWARE Sid aR 
See 002036 Oo01012 BNE 665’ sore JF RTO Tee OCCURRED 
524 ooed4o oo0403 BR bS$ BRANCH IF NO TIMEOUT 
Ses ooe04e Ole716 oo2050 64S: HOV #65$, (SP) SET UP FOR TRAP RETURN 
S27 O0e050 012767 000176 177062 &5$: MOV WSHREG, SHR 33POINT TO SOFTHARE SUR 
S28 002056 012767 000174 177056 MOV #DISPREG, DISP 
529 002064 012637 oo0004 66S: MOV (SP)+, SHERRVEC ”  :RESTORE ERROR VECTOR 
531 002070 OOS067 177144 CLR SPASS ;CLEAR PASS COUNT | 
ese 00e074 ige76? Oo0e00 177151 BITE Spamepaone Hite T WSER SIZE UNDER APT 
524 O02104 012767 001254 177026 on MOV #SSWREG, SWR NO. USE APT SuITCH REGISTER 
536 -SBTTL GET VALUE FOR SOFTWARE Sul Tce REGISTER 
233 O0s116 Obidie BNE bes ORANGH IF Yes) 
£33 00¢1 9 1e67 ? 177126 000001 cnPe SENV, #1 HORE Me RUNNING UNDER APT? . 
eH 902130 026727 177004 000176 cP SUR, #SHREG SOE TARE SUTT CH REG SELECTED? 
543 002140 104406 GTSWR ::GET SOFT-SWR SETTINGS 
S44 O02142 00403 BR 9S 
545 002144 112767 OC0001 176762 68%: MOVB  #1,SAUTOB ;;SET AUTO-MODE INDICATOR ~ 
546 002152 69S: ‘ 
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DZDHNB.P11 GET VALUE FOR SOFTWARE SWITCH REGISTER SEG cOeO 
547 002152 012767 016762 175624 START: MOV HOUSER ERRVEC  ;SET UP THE BUS ERROR VECTOR 
248 obet b1g7b? p0g34 175620 MOV 340 ERRY C+ 
4 1 1e767 017024 175614 MOV ERESERR, RESVEC »SET UP THE RSVD INSTR VECTOR 
SSO 002174 012767 OO0340 175610 MOV #340, RESVEC+2 
SS1 OO0e202 005767 020130 TST TITFLG ;HAVE WE TYPED TITLE ONCE ? 
552 COeed6 oO010le BNE 1$ : 
653 002210 104401 TYPE GO TYPE PROGRAM TITLE 
eee pesig precey 6 conee TITFLG T FLAG - TYPE TITLE ONLY ONCE PER LOAD 
Zep Bas5hq poses pep Abe 176712 BIT #B81TO, ISWR 85 WE WANT TO FUTOSTSES 
557 O02226 001002 BNE 1$ BRANCH IF NOT. 
S58 002230 004767 012716 JSR PC, AUTOSZ :G0 Autos ze. 
659 002234 005767 017454 18: TST VCFLG ; START AT 200 77 
S60 O0cee40 001413 BEQ 13$ 
S61 OO02242 032777 OO00001 176670 BIT #BITO, SWR ARE PARAMETERS TO BE INPUT MANUALLY? 
S62 O02250 001003 BNE : BRAN Y 
S63 002252 016700 017664 MOV ADRVEC, RO OTHERWISE, GET ADDRESSES BETWEEN VECOTRS FROM AUTOSIZER 
S64 O02256 o0040e2 BR 
S65 002260 004767 013634 9S: ISR PC. INPARA :GO ASK_FOR PARAMETERS 
S66 O0e264 O0506? 017424 io$: § CLR VCFLG -RE_INIT START FLAG 
567 O0ce270 005767 O20064 133: TST RETFLG *RETURN TO ECHO TESTS ? 
S68 002274 001402 BEQ 11$ BR IF NOT 
569 002276 000167 o0e426 IMP ECHOL *RETURN TO ECHO TEST START-UP 
570 O0e302 005767 O20040 11$: TST DPFLG ; RETURN TO DATA PATTERNS TEST ? 
571 002306 001402 BEQ 12$ NOT 
S72 002310 000167 003614 JMP EXPAT1 ‘G0 BACK TO DATA PATTERNS TESTS 
573 002314 005700 12e$: TST RO ;USE DEFAULT PARAMETERS ? 
574 002316 001407 BEQ START2 
575 002320 022700 177777 CMP #-1,RO : CHANGE DH SELECT PARAM ONLY ? 
576 002324 001002 BNE -BR IF NOT 
577 002326 O00167 013762 IMP INPAR3 *GO ASK FOR SELECT PARAM. 
578 002332 000167 013666 2s: IMP INPAR ;G0 ASK FOR ALL PARAMETERS 


580 002336 012767 021612 aap STARTe: MOV #DHADTB-2,ADPTR ;GET POINTER TO ADDRESS TABLE 


MOV #OHVCTB-2; VCPTR ;GET POINTER TO VECTOR TABLE 


01 
01 

S82 002352 012767 021714 017754 MOV WBRLVL 2 RPTR {GET POINTER TO BR LEVEL TABLE 

S83 002360 Ole767 177777 917562 MOV #-1. DHNUM i ee RT WITH DH #00 

oH 012767 000001 017132 MOV #1 SELNSK eer RP DH11 BIT TEST MARKER 

S86 002374 o0S267 017550 RESTRT: INC DHNUM ;GENERATE DH11 DEV NUMBER 

587 002400 062767 O00002 017722 ADD #2, ADPTR :UPDATE TABLE POINTERS 

cee 002406 062767 0002 17716 aob 2, VCPTR 

283 ney 2 pees 7 iveatn ses Bo? oF ACK. BHSEL ; TEST FOR SELECTED DH11 

591 002430 001004 BNE RSTRTA *BR IF SELECTED FOR TEST 

S92 002432 006367 017070 REST1: ASL SELMSK ‘SHIFT MARKER TO TEST NEXT DH11 

593 002436 001737 BEO STARTe :BR IF 16 TESTED - START OVER 

594 o02440 000755 BR RESTRT :GO TEST IF THIS ONE SELECTED 

S95 002442 017767 017662 017052 RSTRTA: MOV DADPTR,DHADR :SET UP OHLI ADDR 55 

S96 O024S0 017767 O17656 017046 MOV JVCPTR;DHVCT § ;SET UP THE DHL VECTOR ENTRY 

597 0020456 017767 O17652 017462 MOV JBRPTR,DHRLVL GET BR LEVEL 

S98 002464 OO04S67 012354 JSR RS, SUNUM :GO SET DH SOMBER IN THE MESSAGE BUFFER 

599 002470 O22150 DHNUM 

600 002472 Oe4742 TITLE2+20 

601 O02474 104401 TYPE :GO PRINT “TESTING DH11 &Xx" 


69e 002476 024722 TITLEe 
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bh 
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oo 
BER 


002500 


06 
002510 


002672 
002676 
002700 
002704 
002712 


002716 


p0e744 
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012767 002500 176400 


62 
012767 
004S67 
000756 
012767 
012767 
005067 
004567 
000762 
005067 
004567 
000770 
004767 


056761 
004767 


012767 
BoeGe? 


000771 


000001 
014414 


017370 
003044 
017357 
016726 
Ole1Se 


001616 
012230 


021544 
014316 


177760 
177777 


016662 
014354 


014150 


176504 


000012 


017414 
0166Se2 


¢ 


27-SEP-76 16:09 PAGE 16 


LPADR 


INIT SCOPE RETURN 


MOV 
errr TT rh eeee ee ETT t ih tte eee eee 
OGRAM 1 - DATA RELIABILITY TESTS 


ae SCOP: 
MOV #1, STIMES 
STOHI: JSR PC’ CLSTAT 
JSR PC’ KYBD1 
CLR quick 
CLR DRPLIN 
CLR LINE 
MOV DHVCT, Re 
MOV #RINTI, (R2)+ 
MOVB DHRLVL, (Ro)+ 
TSTB ~—s (Re) + 
MOV #TINT1, (R2)+ 
MOVB  DHTLVL. (Re) 
MOV DHADR, Ri 
NEWLIN: JSR PC, SELINE 
BR 1$ 
BR 2 
1S: IMP PRSTAT 
25: JSR RS, SUNUM 
stisce+20 
TYPE 
sTHsGe 
#LPRTAB, LPRPTR 
NEWLPR: JSR RS SETLPR 
MOV #177760, CHRCNT 
MOV #-1,CLSEL 
CLR QUICKX 
NEWCL: JSR RS, SETCL 
BR NEWLPR 
CLR PARBIT 
NEWPAR: JSR RS, SETPAR 
BR NEWCL 
DHST1: JSR PC, DHSET1 
BIS LINMSK, BAR(R1) 
ISR PC, CHPS1 
MOV #100, TIMEA 
CLR TIMES 
1S: CMP #3, RDONE 
BEQ 
JSR PC, TIMEIT 
BR 1$ 


ST l B-PR 
5 SERRE HEHE HEME ME SE HEHEHE SESE SEES SEE SESE IESE HE SESE SESE SEE SESE EE EE EE EEE EE EE EE EE EE EE EE EEE EERE 
E 


; 1_ ITERATION 

60° CLEAR THE STATISTICS TABLES 
GO SET UP FOR KEYBOARD INTRS. 
INIT THE QUICK TEST FLAG 

INIT DROPPED ae FLAGS 

s INIT LINE NO. TO OO 

;SET_UP THE VECTORS 

i60 TO RINT1 ON RCVR INTR 


‘00 TO TINT! ON XMITTR INTR 
;SET UP DEVICE ADDRESS 


;GO SELECT NEW LINE FOR TEST 

;BR IF TESTED ALL SELECTED LINES 
“BR IF_NOT DONE 

:GO_ CHECK AND REPORT STATISTICS 
PUT LINE NO. IN MSG 


; TYPE LINE NO. BEING TESTED 
;SET UP LPR TABLE POINTER 


;GO SET UP LPR CONSTANT 

:BR_IF DONE ALL BAUD RATES AT THIS LINE 
‘INIT CHAR COUNT 

INIT CHR LNGTH SELECT CODE 


; INIT ix TEST EXIT FLAG 
;GO0 SET U CHAR LENGTH 

;BR_IF DON NE TALL FOUR LENGTHS 
; INIT PARITY SELECT BIT CODE 


;GO SET PARITY SELECT 
;BR IF DONE ALL COMBOS 


;GO_SET UP_FOR TESTING THIS 
eye i SELECTED LINE 


LINE 


NIT T 
NIT T INER B 

TH "es AND XMITTR DONE ? 
LL_THE TIMER 

bs STEPS AROUND THIS BRANCH IF 


0 
1 
IMEOUT OCCURS 


;1 
31 
3B 
ic 
;T 
;T 


SEG 0061 
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3 


Bes >d 
60 


35 


CO304e 


000661 


012711 
004767 
000713 


LOS 
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SUB-PROGRAM 1 - DATA RELIABILITY TESTS 


4 11, SDHADR 
BP3999 16546 i Pike, be 
30202 176812 MOV RTOTAL (RO). ee 
302042 176205 MOV XTOTAL(RO) TMP1: 
012042 JSR RS, SU 
LINE 
EM12+35 
003016 176074 HOV #2$, SLPERR 
016512 O16512 2S: BIS LINMSK, DRPLIN 
001100 MOV #STACK: SP 
BR NEWLIN 
004000 3$: MOV #BIT11, (RL) 
001050 ISR PC, CKER 
BR NEWPAR 


aay Rey [re DH11 


E INDEX 
E MutT D_ COUNT 
RCVD COUNT 
T LINE NO. IN MESSAGE 


; SET UP ERROR LOOP RETURN 
LINE FAILED TO FINISH ON TIME - HUNG 

cer ROP FLAG 

RESET STACK POINTER 

GO TRY ANOTHER LINE 


;CLEAR THE WORLD OUT IN THE DH11 
:GO UPDATE THE DATA ERROR TABLES 
;GO TRY NEXT PARITY COMBINATION 


SEG 002 


MOS 


MAINDEC- 11-DZDHN-B MACY11 27(732) 27-SEP-76 16:09 PAGE 18 
OZDHNS.P11 SUB-PROGRAM 1 - DATA RELIABILITY TESTS SEG 0063 
677 
is ; TRANSMITTER INTERRUPT SERVICE ROUTINE ONE 
44 032711 002000 TINT1: BIT #BIT1O, (R1) ; NON i MEM ERROR ?? 

a poseed i4 Bt 38 . -BR I NOF 
es oO cy ot A03 63 MOR pe tape $85. Cock ag NTRS 

pp shed 12711 atti MOV Petit (R1) * CLEAR bute DH11 
686 003064 116704 017062 MOVB LINE, RG SET ip. THE Se DATA 
687 003070 042703 175760 BIC #175760,R3 Pats "hrc pierme BITS 
Peg BB SBS¢ Baga es 012026 Ney Bd: Stier 2 oft ERROR INFO 
630 00310e 004567 011736 JSR RS, SUNUM ‘GO SET UP LINE NO. IN MSG 

92 11 pgsiRe EM1+44 

693 003112 012767 O03122 175770 MOV #1$, SLPERR SET UP THE ERROR LOOP RETURN 
694 003120 104001 - ERROR 1 sate ‘sated ANON EX BROR 
bgp Bost 4 peeses 016404 016404 ‘ BIS LENMSK, DRPLIN SET T THE BRO BROPPED FLAG FOR THIS LINE 
697 003132 000167 177436 JMP NEM IN GO TRY NEXT LINE 
699 003136 011103 25: MOV (R1),R3 :GET THE SCR REG CONTENTS 
700 003140 100433 BMI 4g ‘BR IF XMIT DONE SET 
702 003142 004767 016274 JSR PC, CHPS2 GO LOCK OUT INTRS 
703 093146 012711 oo4000 MOV #BtT11, (RL) *CLEAR THE DH11 - FATAL ERROR 
704 003152 O1e704 100000 MOV #BIT1S5°RY *SET UP S/B DATA 
705 003156 156704 016770 BISB LINE, RG 
706 003162 042703 077760 BIC 877760, R3 ;CLEAR OUT SUPERFLUOUS BITS 
707 003166 01010 MOV Ri, :SET UP REGAD 

003170 004767 011734 ISR PC’ SUERL -GO SET UP ERROR INFO 
709 003174 O04 011644 JSR RS, SUNUM :GO SET UP LINE NO. IN MSG 
Ht Bee feel Hiss 
712 nen Wied 003214 175676 MOV #3$, SLPERR ;SET UP ERROR LOOP RETURN 
713 003212 104002 ERROR 2 -XMITTR FALSE INTERRUPT 
714 003214 Oe2be 38: CMP (SP)+, (SP)+ :POP THE STACK 
715 003216 056767 016312 016312 BIS LINMSK, DRPLIN SET THE BROPPED FLAG FOR THIS LINE 
716 003224 000167 177344 IMP NEWL :GO TRY NEXT LINE 
71 S761 ooo0l12 4S: TST BAR(R1) ;DID BAR BIT CLEAR ?? 
18 Bps534 nates BEQ 6$ *BR IF YES 
721 003236 004767 016200 ISR PC, CHPS2 :GO LOCK OUT INTRS 
72 apace 1g 03 900016 MOV BAR(R1).R3 :GET THE WAS DATA 
723 «(00 12711 0040 MOV #BIT11, tR1) :CLEAR THE DHi1 
724 003252 O0S004 CLR RY “SET UP S/B DAT! 
725 003254 010102 MOV 1,R2 -SET UP 
726 003256 0be70e o0001e2 ADD #BAR, R2 
727 OOsebe OO4767 O11b4e ISR PC, SUERL :GO SET UP ERROR INFO 
728 003266 O04S67 0115Se2 JSR RS, SUNUM :GO SET UP LINE NO. IN MSG 
729 003272 Oe21Se LINE 
730 0032 EM3+5S 


74 022750 
731 003276 012767 003306 175604 V #5$,SLPERR ;SAVE THE ERROR LOOP RETURN 
73e 003304 104003 ERROR 3 ;BUFFER ACTIVE REG FAILED TO CLEAR 


= 
oO 


MAI Coty Ome 
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003306 
734 003310 
003316 


003322 
003326 
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Ol622e0 016220 
177252 


000010 


003400 175512 


Ol61e6 016126 


177160 


000006 
016156 


032776 


016000 


000006 
011454 
011364 


003474 175416 


016032 
177064 


016032 


016062 
016424 
O3024e2 


000001 016042 
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6S: 


7$: 


10$: 


CMP 


- DATA RELIABILITY TESTS 


(SP)+, (SP)+ 
LINMSK, DRPLIN 
NEWLIN 


BCR(R1) 
8$ 


HPS2 
BEATE R3 
#81T11, (RL) 


75, SLPERR 
(sp) 

LINMSK, (BRPLIN 
CAR(R1),R3 
CHRCNT, RY 


#TBUF ,RY 
Ra. Rd 


pts » CHPS2 


#9$, SLPERR 


SP)+, (SP)+ 
LINN, DRPLIN 


R3,-(SP) 
R4’-(SP) 
CHRCNT, R3 
LINE,R4 

RY 

R3,XTOTAL (RY) 
(SP)+,R4 
(SP)+/R3 
#8170, ROONE 


SEG 0064 
;POP GOES THE STACK 
sSET THE poorrte FLAG FOR THIS LINE 
:GO TRY NEXT LINE 
;DID BYTE COUNT GO TO ZERO 7? 
;BR IF YES 
;GO_ LOCK OUT INTRS 


;GET THE WAS DATA 
CLEAR. THE DH11 


Ue Re ace para 
60 SET UP THE ERROR iNFO 
GO SET UP LINE NO. {N MSG 
;SET UP ERROR LCOP RETURN 
iBY 1K: et REG FAILED TO GO TO CO0000 


+ ibe 
err DROPPED FLAG FOR THIS LINE 
GO TRY NEXT LINE 


; GET THE WAS DATA 

;SET UP S/B DATA 

;WAS CAR CORRECT ?? 

;BR IF YES 

iG LOCK_OUT JNTRS 

*SET UP REGAD 

;GO SET UP ERROR INFO 

:GO SET UP LINE NO. IN MSG 

;SET UP THE ERROR RETURN 

; CURRENT ADDRESS REG NOT CORRECT 
P THE STACK 

SET THE DROPPED FLAG FOR THIS LINE 

‘G0 TRY NEXT LINE 

;;PUSH R3 ON STACK 

;;PUSH R4¥ ON STACK 


ca The ho, IN R3 


faa xnTT out 


MAINDEC- | eee 
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eg ee eae 
OWONMTUCWue 


821 


003550 
003SS4 


003856 
0 


003640 
003642 


003734 
003742 


004022 


000167 


105711 
100434 


004767 


056767 
000167 


016167 
100431 


004767 


000167 


BO6 
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SUB-PROGRAM 1 - DATA RELIABILITY TESTS 


;RECEIVER INTERRUPT SERVICE ROUTINE ONE 


040000 RINT1: BIT #BITL4, (RL) ;SILO OVERFLOW ERROR ?? 
BEQ 2$ BR IF NOT 
015660 JSR PC, CHPS2 GO LOCK OUT INTRS 
MOV 1), R3 GET THE WAS DATA 
004000 MOV #BIT11, (RL) *NOW CLEAR THE DH11 
177760 BIC 177760,R ‘CLEAR JUNK 
016352 MOVB LINE, R4Y 
011324 JSR PC, SUERI :GO SET UP ERROR INFO 
011234 JSR RS; SUNUM :GO SET UP LINE NO. IN MSG 
EM6+44 
003624 175266 MOV #15, SLPERR SET UP ERROR LOOP RETURN 
ERROR 6 :SILO OVERFLOW - BAD,BAD,BAD !!! 
1S: CMP (SP)+ :POP GOES THE STACK 
015702 015702 BIS LINK, BRPL IN SET THE DROPPED FLAG FOR THIS LINE 
176734 IMP NEWL :GO TRY NEXT LINE 
2S: TSTB = (R11) :CHAR AVAIL SET ?? 
BMI 4 BR IF YES 
015572 JSR. PC,CHPS2 :G0 LOCK OUT INTRS 
MOV (RL) RS ;GET Wl AS DATA 
177560 BIC Meee R3 “CLEAN IT UP 
004000 MOV #8IT11, (R1) ?NOW CLEAR DH11 
000200 MOV #B1T07'R4 ‘SET UP S/B DATA 
016260 BISB LINE, R4 
MOV R1,Re SET UP REGADR 
011230 ISR PC’ SUERI GO SET UP ERROR INFO 
011140 JER RS, SUNUM -GO SET UP LINE NO. IN MSG 
EM74+51 
003720 175172 OV #3$, SLPERR ;SET UP THE ERROR LOOP RETURN 
ERROR 7 : RECEIVER FALSE INTERRUPT 
33: CMP (SP)+, (SP)+ :POP GO 
015606 015606 BIS LINMSK,DRPLIN ;SET_THE DROPPED FLAG FOR THIS LINE 
176640 IMP NEWLINE :GO TRY NEXT LINE 
ooo0002 175240 4S: MOV NRC(R1),STMPO  ;SAVE THE DATA RECEIVED 
BMI 6$ :BR IF IT WAS VALID DATA 
015472 JSR PC, CHPS2 GO LOCK OUT INTRS 
004000 MOV #81T11, (R1) "NOW CLEAR THE DH11 
030516 024530 SUB #RBUF REFPTR WHICH CHAR WAS IT ?? 
4524 MOV REFPT TR, Re *SAVE CHAR NUM 
011132 JSR SUER2 :GO SET UP ERROR INFO 
011046 JSR RS SURUM GO SET UP LINE NO. IN MSG 
EM1O0+4S 
004012 175100 MOV #5$, SLPERR :SET UP ERROR RETURN 
ERROR s RECEIVED TNVALIO DATA 
S$: CMP (SP)+. (SP)+ :POP GOES T K 
015514 015514 BIS LINMSK,DRPLIN SET THE DROPPED FLAG FOR THIS LINE 
176546 IMP NEWLIN -GO TRY ANOTHER LINE 


SEG 0065 


CO6 
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DZDHNB.P11 Tl SUB-PROGRAM 1 - DATA RELIABILITY TESTS SEG 0066 

B44 

84S O04026 6$: 

846 OO4026 010346 MOV R3, (SP) ; PUSH R3 ON STACK 

€47 004030 O10446 MOV SP) PUSH R4Y ON STACK 

848 004032 016777 175144 o244se2 MOV SiO GRBFPTR *STORE CHAR IN THE BUFFER 

849 OO4040 062767 O00002 oe4444 ADD TR “UPDATE THE POINTER 

8SO OO4046 026767 O1SS4YO 024436 CMP RGtEND. REFPTR END OF BUFFER ?? 

851 OO40S4Y 001013 BNE : : OT 

852 OO40S6 016703 015520 MOV CHRCNT, R3 GET CHAR COUNT 

853 004062 005403 NEG ‘ 

854 004064 116704 016062 MOVB LINE, R4 ;GET THE LINE NO. 

855 004070 006304 ASL RY DOU LE IT 

856 004072 O60364 030202 ADD R3,RTOTAL(R4) UPDATE TOTAL RECEIVED COUNT 

B57 004076 052767 oOo00d2 o1sso4 is BIS #8171, RDONE ?SET THE RCVR DONE SLAG 

8539 004104 o12604 MOV (SP)+,R4 ;;POP STACK INTO RY , 

860 OO4106 012603 MOV (SP)+,R3 “POP STACK INTO R3 


851 004110 o00002 RTI RETURN TO WAIT LOOP 


MAINDEC 
DZDHNB.F 


910 


wWwoovonowow 
SOU CWE 


~ | aoe 
Tl 


004112 


004312 
004314 
004322 


004352 


ppasee 


004360 


012767 


7 
060567 
117704 


104011 
012601 
032767 
001402 
004767 
005267 


026767 
001315 


000207 


061508 


005277 


DO6 


MACY11 27(732) 27-SEP-76 16:09 PAGE 2e 
SUB-PROGRAM 1 - DATA RELIABILITY TESTS 


; THIS ROUTINE IS CALLED TO CHECK Me 3 RECEDED DATA 
‘AND UPDATE THE STATISTICS TABLE ENTRI 


030516 024372 CKER: MOV #RBUF , RBFPTR 
TBFPTR 


032776 024365 MOV #TBUF. 
030302 024346 MOV #OATERR, DEPTR 
030342 024342 MOV #PARERR’ PEPTR 
030402 024336 MOV #OVRERR; ORPTR 
030442 024332 MOV #FRMERR, FRPTR 
015770 HOVE NE,RS’ 
024312 ADD RS,DEPTR 
024310 ADD RS; PEPTR 
024306 ADD RS; ORPTR 
024304 ADD RS; FRPTR 
024304 18: MOVB 3TBFPTR,RY 

SWAB RY 

CLRB RY 
015732 BISB  LINE,RY 

SWAB. RY 
100000 BIS #B1T1S,R4 
024260 MOV GREPFTR, R3 

CMP R3,R 

BEQ 33° 
174756 MOV R3, STMP7 

MOV R1’-(SP) 
024242 MOV RBFPTR,R1 
024240 MOV TBFPTR, Re 

MOV R2,RO 
032776 SUB #TBUF , RO 
000066 JSR C, UPDE 
010632 JSR PC; SUER2 
010546 JSR RS; SUNUM 

INE 

EM11+23 
004312 174600 OV #2$, SLPERR 

ERROR 11 

2s: MOV (SP)+.R1 

070000 174676 BIT #70000, $TMP7 

BEQ 3$ 
000036 JSR PC, SOFT 
024160 3S: INC TBFPTR 
oo0002 o24150 ADD #2, RBFPTR 
015244 024142 CMP RBFEND, RBFPTR 

BNE 1$ 

RTS PC 

UPDER: CMPB  R3,R4 

BEO 

024116 INC JDEPTR 


REPORT ALL ERRORS, 
FOR ALL LINES ACTIV 


;SET UP POINTERS 
;SET UP POINTERS TO STATISTICS TABLES 


;GET LINE NO. AND DOUBLE IT 
;POINT TO CORRECT LINE ENTRY IN TABLE 


;GET THE S/B DATA 
:PUT LINE NO. IN HIGH BYTE 


;AND FINALLY ML VALID DATA BIT 
GET THE WAS DAT 


;MAS = S/B tonat 
:BR IF YES 


; SAVE THE WAS DATA 


THE _WASADR 
GET XMIT “BUFFER ADDR 
;GENERATE CHAR # 
GO CHECK AND UPDATE THE DATA ERROR TABLE 
;GO SET UP ERROR INFO 
:GO PUT LINE NO. IN MSG 


;SET UP ERROR RETURN 
;DATA eR ERROR OR PARITY,FRAMING 


‘RESTORE T HE DEVADR 
ANY PARITY, , OVERRUN, OR FRAMING ERROR 


;GO TAKE CARE OF SOFT ERROR REPORT 


;UPDATE POINTERS 
;COMPARED ALL CHARS ?? 
;BR IF NOT 


;RETURN TO WAIT LOOP 


per Byres CORRECT ?? 
COUNT THE DATA ERROR 


SEQ 0067 


MAINDEC-11-DZDHN-B 
DZOHNB.P11 T1 


004364 


004424 


000207 


006367 
100002 


005277 
000207 
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174626 


Ppagie 


024076 
174602 


024060 


1$: 


SOFT: 


1$: 


es: 


3$: 


RTS 


PC 
$TMP7 
1$ 
ane" 
aFRPTR 

= 
JPEPTR 
PC 


; RETURN 
; TEST FOR OVERRUN ERRORS 
:BR IF NONE 


:FOUNT FOR _— ERRORS 
:BR =F 


s COUN Tit 
TEST rn “ees ERRORS 


SEG 0068 


FOG 
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DZOHNB.P11 SU UB-PROGRAM 1 - CATA RELIABILITY TESTS SEG 0069 
ans ; THIS ROUTINE IS CALLED TO PRINT OUT THE TEST STATISTICS 
934 O04426 012767 000001 015100 PRSTAT: MOV #1,LINMSK sel UP_BIT TEST MARKER 
935 004434 005001 CLR Rl 1 CONTAINS THE LINE NO. 
an 004436 O04567 010402 JSR RS, SUNUM 60 SET UP DH11 # IN STAT MESSAGE 
938 O04442 022150 DHNUM 
939 OO4444 025543 STMSG1+6 
940 -OO4446 104401 TYPE ;GO TYPE THE STATISTICS HEADER 
941 OO44SO 025535 STMSG1 
942 OO44Se 104401 TYPE ; TYPE HEADER 
aes CO44S4 025640 STMSG4Y 
945 OO44S6 036767 O1S0S2e O150S2 18: BIT LINMSK,DRPLIN ;DID THIS LINE GET DROPPED ” 
ae OO4464 001411 BEQ es ;BR IF NOT 
348 OO446G 10167 174526 MOV 1,$TMP7 ;SAVE THE LINE NO. 
949 00447 O4S67 010346 a fe" SUNUM :GO PUT LINE NO. IN MESSAGE 
950 OO4476 001220 $TM 
951 OO4S00 025617 sris63+10 
952 004502 104401 TYPE 
953 O04S04 025607 STMSG3 
eee O004S06 000436 BR 3$ ;GO TEST NEXT LINE 
956 004510 010102 2s: MOV R1,Re ;SET UP Re WITH TABLE INDEX 
957 O04Sle 006302 ASL 
958 004514 036767 015014 015010 BIT LINMSK,LINSEL iy My: oo SELECTED 7? 
360 peed 10187 1744S2 MOV Rl, STMPO Tip. eH R_INFORMATION F 
961 £3 year iN "8 THE MEscace POIN FERS 
S962 004530 016267 030202 174446 MOV RTOTAL(R2) ,STMP1’ 
963 OO4536 Ol6267 O30e4e 174442 MOV XTOTAL (Re) , STMPe 
964 016267 030302 174436 MOV DATERR(R2) , STMP3 
965 004552 Ol6e67 O30342 174432 MOV ARERR(Re) , STMPY 
966 O04S60 016267 O30402 1744cé MOV OVRERR(R2? , STMPS 
967 OO4SEE O16267 O30442 174422 MOV FRMERR(R2) , STMPE 
968 004574 012767 OO4604 174306 MOV #3$ , SLPERR ;RETURN TO 3% AFTER PRINTING LINE 
969 O0460e 104013 ERROR 13 
970 004604 005201 3$: INC Rl ;STEP_ TO NEXT LINE 
971 OG4606 006367 9014722 ASL LINMSK ;SHIFT THE MARKER 
972 O046le 001401 BEQ ENDA :BR IF ALL LINES REPORTED 
973 004614 000720 BR 1$ :GO BACK AND GO THIS LINE 


ee \ ion 
NB.P1LL 


OZOH! 


004702 


ee 


090167 
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7425 

0024 
0153le 

000002 
o0000e 
000002 
014642 


004076 
014630 


175534 


004136 
015464 


015460 
015454 


014620 


GO6 
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ENDA: 


18: 


SCOPE 
CL 


SE 
SELMSK , DHSEL 
ENDA 

RSTRTA 


;RE-INIT TEST NUMBER FOR NEXT PASS 
:NOP THE SCOPE IN ENDPASS ROUTINE 
‘GENERATE NEW OH11 NUMBER 

‘UPDATE THE TABLE POINTERS 


;SHIFT MARKER TO TEST NEXT DHI11 
:BR IF_NOT TESTED a L DH11’S 
;JUMP TO EOP IF WE HAVE 

315 ae oa SELECTED ? 


‘60 TEST THIS DH11 


MAINDEC-11-DZDHN-B 
DZOHNB.P11 


004744 
GO4746 


004750 


) 
o0S02e 


oosoe6 
005032 
005034 


00 
Opel 18 


005120 


012767 
005067 
005067 
000167 


012767 


Oeb2Se 
000167 


104401 


000207 
105067 


000167 
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-SBTTL SUB-PROGRAM 2 - SINGLE LINE ECHO/CABLE TESTS 
RAKE EERE EEA E EE 
% 


* SINGLE LINE ECHO TESTS 
HHA EEE EEE EE EAE EEK EH EEE AER REESE 


174714 


160020 
000330 


011250 


015164 
177760 
015152 


000001 


014514 
013204 
0:5314 


021201 


000015 
021157 


021145 
000116 
000131 
000574 


015444 


O14S64 
014560 


014524 


021135 
021125 
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. 
$ 


ECHO: 


ECHO1: 


ECHO2: 


1$: 


es: 


33: 


4$; 


TY 
ECMSG1 
JMP 


TYPE 
ECMSGe 
CT 


#-1,RETFLG 
D 


PFLG 
VCFLG 
BEGINA 


#160020 , DHADR 


#330, DHYCT 


INPAR 


(SP)+, LINE 
#177760, LINE 


#1,L INMSK 
Re 


es 
LINMSK 
1$ 
PC,LPRIN 
DPFLG 

3$ 

PC 

ECe 


(SP)+,.RO 
#15,RO 


RO,ECe 


4$ 


ECHO3 
#116,ECe 
EC 


HO3 
#131,EC2 


SENDP 1 


;SET RETURN FLAG - COME BACK 
;CLEAR PATTERNS TEST FLAG 

; INIT VECTOR SETUP FLAG 

;10 “ECHO1” AFTER SETUP 


;SET UP DH11 DEFAULT ADDRESS 
:SET UP DH11 DEFAULT VECTOR 


; PRIN -D, MESSAGE 
‘TeenT Line ECHO TEST - CONNECT 


P TOR 
: ADDRESSES - COME BACK TO “ECHOe” 
80 ASK FOR TTY INPUT 
LINE # (00 - 17 OCTAL)” 

INPUT tne NO. FM TTY 
: *GET NO. TYPED 
;CLEAR JUNK 

;GET LINE NO. 

i RGRRECT FOR SHIFT ROUTINE 

: INIT LINE SELECT BIT MASK 
sCOUNT Oh ONE LINE CHECKED 
pape SELECT BIT 
:GO Ask Fon ToND SET UP LINE PARAMETERS 
;DATA PATTERNS TEST ? 
;BR IF NOT 
;RETURN TO PATTERNS TEST 
;CLEAR ECHO BUFFER 
;"SEND MODE - Y OR N ?” 
:GET CHAR TYPED 
:GET CHAR TYPED 
‘WAS IT A <CR> ? 


:BR YES 

ECHO WHAT WAS TYPED 

;GO WAIT FOR TERMINATOR 
LY ?? 

E 

A oe ye ? ? 


BR NOT ASK AGAIN 
G0 TO SEND ROUTINE 


SEG 0071 


MAINDEC-11-DZDHN-B 
NB.P11 


DZDH 


00S246 
o0SeSe2 


08304 
005310 
005314 


Bosses 


I06 


MACY11 27(732) 27-SEP-76 16:09 PAGE 27 
SUB-PROGRAM @ - SINGLE LINE ECHO/CABLE TESTS 


poy? ? p143ie ECHO3: JSR PC, CHPS2 
S067 O1Se1 CLR CEXIT 
005067 015232 CLR EXE LAG 
012767 120240 o1sS000 MOV #120240 DHRLVL 
016701 014350 MOV 
012711 004000 MOV ssi! (R1) 
016700 014342 MOV VCT, RO 
012720 005476 MOV SRINT?, (RO)+ 
iie71 014754 MOVB DHRLVL, (RO) 

72 TST (RO)+ 
012720 00533 MOV #TINT2, (RO)+ 
116710 014743 MOVB  DHTLVL, (RO) 
016711 O14742 MOV LINE, (R1) 
bere 032771 MOV #TBUF Re 

711 00010 BIS sa7T08 (R1) 
016761 014352 oo0004 MOV CURLPR: LPR(R1) 
004567 O07bl2 JSR RS, SUNUM 
022152 LINE 
026427 Ecnsc3+20 
apeag? Cusca 
riety Fane 
O26466 ECMSG4 
004767 014154 JSR PC, CHPS1 
012767 OO0100 O1SO&0 DHWAIT: MOV #100, TIMEA 
005067 O15056 CLR TIMER 
g S767 015054 1S: TST XIT 

1018 BNE 
004767 011616 ISR PC, TIMEIT 
000772 BR 1$ 
010167 1736 MOY R1, $REG1 
011167 153p98 MOV rai $TMPO 
052711 oo4000 BIS WIth} (R1) 
012757 o005324 173566 MOV #2$, SLPERR 
104036 ERROR 

O1E7? 177424 25: Mp HO2 


;GO LOCK OUT INTRS 
INIT CONTROL-C ge FLAG 
: CLEAR Shee XIT FLAGS 


A 
TED DH1 
GET T HE FIRST VECTOR ADDRESS 
:SET UP THE VECTORS 


;SET_THE LINE SELECT BITS 
;INIT BUFFER POINTER 
;ENABLE RCVR_INTRS 

;SET UP LINE PARAMETERS 
;PUT LINE NO. IN MESSAGE 


oo TPE CHARS” ON TEST TERMINAL” 
NT DIREC 


:" {CONTROL-C TO EXIT] [CONTROL-E TO ECKC SUFFER)” 
GO CLEAR PSW 


;INIT TIMER “A” 
INIT TIMER “B” 
ign IF YES EXIT ?? 


CA LL TIMER 
;BR IF NO TIMEOUT 


ia vE CONTENT OF 1’ 


;CLEAR OUT THE DH11 

;SET ERROR LOOP RETU 
:REPORT_RCVR WAIT TYREOUT 
:GO RESTART 


MAINDEC-11-DZDHN-B MACY11 27(732) 27-SEP-75 16:09 PAGE 28 
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1984 s TRANSMITTER INTERRUPT SERVICE ROUTINE TWO 
1086 005330 042711 120000 TINT2: BIC #81T1S+B1T13, (R1) ;DISABLE XMIT_INTRS 
1087 605334 022767 000001 015030 CMP #1, EXFLAG ; CONTROL -C FLAG ? 
1088 005342 001437 BEQ YES 
1089 005344 022767 000003 015020 CMP #3, EXFLAG thas BUFFER JUST DUMPED ? 
10390 005352 001437 BEQ 
1091 005354 022767 oD0002 o15010 CMP #2, EXFLAG ‘CONTROL <E FLAG ? 
1092 005362 001403 BEQ § ‘BR IF YES 
1093 005364 O20227 034126 CMP R2, #TBUF +600. :BUFFER FULL ? 
1094 005370 002434 BLT :BR_IF NOT 
1095 005372 012757 000003 014772 15: MOV re} ray :SET DUMP FLAG 
1096 OOS400 162702 032776 SUB a TBUF -SET UP BYTE COUNT REG 
1097 005404 o0S40e2 NEG 
1098 OOS406 010261 000010 MOV (R1) 
1099 O0S4i2 012761 032776 o00006 MOV nae CAR (RI) :SET uP CURRENT ADDR REG 
1100 O0S420 012767 000100 014712 MOV 0, TI THEA ‘INIT TIMER 
1101 005426 052711 920000 BIS tart T13.¢ ; ENABLE XMITTR INTR 
1102 005432 016761 014076 oo0012 MOV tPAMISI BAR CRI) “ACTIVATE LINE 
1103 005440 000415 BR 4§ GO EXIT 
1105 OOS442 012767 177777 O14674 28: MOV #-1,CEXIT SET CONTROL-C EXIT 
1108 0054s0 000411 BR 45 GO EXIT 
1198 o0S54S52 oO12702 032776 3$: MOV #TBUF , R2 sRESET ECHO BUFFER PLOPINTER 
1199 OO54S6 005067 014710 CLR EXFLAG INIT EXIT FLAG 
1110 O0S4¥62 012767 OO00100 o146SG 31%: MOV #100, TIMEA : INIT PTHER AGAIN 
111 005470 052711 900100 BIS #BITOS, (RL) *ENABLE RCVR INTR 
1113 005474 ogo00e2 4g: RTI ;RETURN TO MAINLINE 
1115 


Np 


Or 
4 


— b+ b= 9 9 hp 


0 bh eb bb eb pe he be pe po pe ee 


se bb be = be bb pe hh pe ph pp 


KO6 
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NB.P11 SUB-PROGRAM @ - SINGLE LINE ECHO/CABLE TESTS SEG 0074 
18 ;RECEIVER INTERRUPT SERVICE ROUTINE TWO 5 
18 7 00100 RINTe: BIC #B1TO6, (R1) ;DISABLE RCVR INTR 

19 aDssos tg 7 aadode 173472 MOV NRC(R1), STMPO SAVE THE DATA TYPED 

20 173464 BIC #177600, STMPO ;CLEAR HIGH BYTE 

¢4 Boeele Bee7e? a603 173456 CMP #3, STMPO :CONTROL-C TYPED ?? 

ss 005Se4 1015 BNE 1$’ ;BR IF NOT 

se peace Et e4 pote oes oe Hat 35 a ;SET UP TO ECHO CONTROL-C 
52 OSS42 012761 hada 0001 MOV 2 BCR(R1) ;SET UP BCR ~s 

27 005550 012767 000001 014614 MOV ai, EXFLAG ;SET CONTROL-C FLAG 

ss OOSSSE 9 O00444 BR :GO OUT PUT CHAR TYPED 

30 005560 022767 OOO00S 173414 15: CMP #5, STMPO ;WAS IT A CONTROL-E ?? 

3 005566 001021 BNE es ;BR IF NOT 

33 005570 112767 000136 014576 MOVB #136, ECBUF ;SET UP TO ECHO CONTROL-E 
34 005576 112767 000105 014571 MOVB #105; ECBUF +1 

3S O05604 112722 000136 MOVB #136, (R2)+ ;PUT IN THE ECHO BUFFER 
36 005610 1le7e2 000105 MOVB #105, (Re)+ 

3? 005614 Qle761 177776 000010 MOV 8-2, BCR(R1) ;SET UP BYTE pot REG 

38 O0S622 Q12e767 O00002 014S4e MOV #2, EXFLAG SET CONTROL-E FLAG 

43 005630 000417 BR 4$ GO EXIT 

41 022767 000012 173342 2s: CMP #12, STMPO ;WAS i? A_LINE FEED ?? 

42 005640 001003 BNE 3$ :B 

43 O05642 004767 012060 JSR erred. ;GO LOAD FILLERS 

ue OOS646 000410 BR 4$ ;GO EXIT 

46 OOS6SO 116767 173326 O14S16 3S: MOVB STMPO, ECBUF ;SET UP CHAR TO ECHO 

47 O05656 116722 173320 MOVB STHPO, (Re) + 

48 O0566e 012761 177777 000010 MOV BCR(R1) ;OUTPUT ONE CHAR ONLY 

49 005670 Q1e761 022374 QO00006 4S: MOV tECOUE CAR(R1) : SET a CURRENT ADDR REG 
SO 005676 012767 000100 014434 MOV #100 TIMER INIT TIMER AGAIN 

51 005704 052711 020000 BIS serT13, (R1) ENABLE _XMITTR INTR 

Se 005719 016761 O136e0 900012 MOV LINMSK; BAR(R1) ACTIVATE THE LINE 

S3 005716 000002 RTI ;RETURN TO MAINLINE 

3 

sf 


LO6 
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OZDH SUB-PROGRAM 2 - SINGLE LINE ECHO/CABLE TESTS SEG O75 
7 7 yy NOP1: TYP : OR_DIRECTIONS 

+12 ARES Meats — oihece ae pE a R BG ren - TERMINATE WITH CONTROL-C” 

1159 005724 O1270S 032776 MOV #TBUF ,RS T UP BUFFER POINTER 

1160 0057 1048 1$: ROCHR ‘gEy CHAR 

1161 7 126 MOV (SP)+.RO 

1162 005734 110067 020303 MOVB  RO,ECe sECHO CHAR 

1163 005740 104401 TYPE 

1164 005742 O26243 C2 

1165 005744 022700 o00003 CMP #3, RO ;WAS IT A CONTROL-C ?? 

1166 005750 001421 BEQ 4$ *BR IF YES 

1168 005752 026727 013624 ocD0400 CMP CHRCNT, #256. ;BUFFER FULL ?? 

1169 005760 003015 BGT 4 . 

1170 005762 22700 Oo000le CMP #12,RO “WAS IT ALINE FEED ? 

1171 005766 001010 BNE 3$ *BR IF NOT 

1173 005770 110025 MOVB _—-RO, (RS)+ ;LOAD CHAR TYPED 

1174 005772 116704 o1444e MOVB  FILLB,RY :GET FILLER COUNT 

1175 005776 116725 014434 2s: MOVB PICEA’ Ras) ;LOAD A FILLER 

1176 OO06002 005304 DEC RY 

1177 008004 001374 BNE 2$ 'BR IF NOT DONE 

1178 006006 000750 BR 1$ GET SOME MORE INPUT 

1180 006010 110025 38: MOVB —RO, (RS)+ ;LOAD_BUFFER 

1181 006012 O00746 BR 1$ :GO GET SOME MORE 

1183 006014 004767 011630 4g: ISR PC, SENDP2 ;GO XMIT THE BUFFER 

1184 O06020 105067 020217 cS: CLRB «E22 CLEAR ECHO BUFFER 

1185 goede HHL TYPE 

11 6026 0275 SNMSG3 ;"CHANGE PARAMETERS- Y OR N™ 

1187 006030 104410 b$: ROCHR 

1188 006032 012600 MOV (SP)+,.RO ;GET CHA 

1189 006034 12°700 oo0015 CMPB ssw 1S, RO WAS I R <CR> HE TYPED ?? 

1190 0068040 001405 BEQ 7$ :BR IF IT WAS 

1191 O06042 110067 020175 MOVB RO, EC2 *ECHO IT 

1192 oos04¢ 104401 TYPE 

1193 026243 EC2 

1134 000766 BR 6$ ;GO WAIT FOR TERMINATOR 

1196 OO60S4 105767 920163 73: TSTB=Ss«éEC2 ;<CR> ONLY ?? 

ile SOEDeS eee 000116 020153 oP SrIe, EC2 ior HE Say NO 7? 

113 phe oes nate BEQ Haig Bh IF He DID 

1200 O06072 122767 000131 020143 CMPB  =s- #131, EC2 ;DID HE SAY YES ?? 

1201 006109 901347 BNE S$ °GO ASK ALL OVER AGAIN 

i202 O06102 O00167 176646 IMP ECHO2 :GO ASK FOR NEW PARAMETERS 


MAINDEC-11-DZDHN-B 
OZDHNB.P11 


: 


if 
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RE EK EERE RAK EERE EE EEE EE 
* DATA PATTERNS TESTS % 
RRR REE EERE EER ERERERES 


cate = ie 014232 EXPAT: 


006254 


012767 


012700 
005400 
010067 
012767 


116710 


173814 
160020 
000330 
010050 


176574 
013170 


001001 


000400 
013356 
120240 

6 


013700 


007644 
013667 


013364 EXPAT: 
013360 


EXPAT2: 


1$: 


es: 
33: 


013714 


Crk 


brMsGl 
J 


ReteLe' 


secina 
#160020 , DHADR 
#330, DHVCT 
INPAR 


PC,ECHO2 
PC; SUCLMK 


(SP)+,RO 
2s 


RO, #513. 

3$ 

1$ 

#256. ,R0 

RO, CHRCNT 

fe ie DHRLVL 
DHVCT,R 


#RINT3, (RO)+ 
DHRL VL, ( (RO) 


#TINT3, (RO)+ 
DHTLVL; (RO) 


‘ath EGho teers PLac- 


;CLEAR VECTOR SETUP FLAG 
:GO SET UP RETURN TO “EXPAT1” 


;SET UP DEFAULT DH11 ADDR 
; AND VECTOR TOO 


;"DATA PATTERNS TESTS - CONNECT TEST JUMPAR™ 
GO GET SOME PARAMETERS RETURN TO EXPAT2 


;GO GET REST OF THE PARAMETERS 
GO SET UP CHAR LENGTH MASK 


;"BUFFER SIZE ? (1-512) 
GET THE SIZE TYPED 


;BR IF DEFAULT TO 256. <CR> 

;100 BIG ? 

BR IF NOT 

;" INVALID SIZE - TRY AGAIN” 

GO ASK AGAIN 

; DEFAULT TO 256. BYTE BUFFER 
MAKE IT NEG BYTE COUNT 


CAVE IT FOR TEST 


;SET BR LEVELS TO BRS 
:SET UP VECTORS 


SEG 0076 


sate oe 


DZDHNB.P 
1245 


1549 


006260 


006272 


006402 
DOBYOE 

414 
006416 
006422 
006430 
006432 
006436 

444 

346 


0064S2 
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104407 


104401 
027761 
105767 
001005 
012767 
000167 
022767 


001002 
000167 


Bite 
000167 
Bite 
000167 
ae 
Bits 
atts 
Be 

022767 
001002 
000167 
104401 


030023 
000672 
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178t 


013224 


000015 


014032 
017717 


017701 


000015 
000S06 


000101 
000102 
000125 
000164 
000104 
000246 
000122 
000330 
000123 
000474 
000102 


000620 


014002 


013766 


013752 


013736 


013722 


013706 


013672 


27-SEP-76 16:09 PAGE 32 


EXPAT3: CKSWR 


7$: 


9S: 


1$: 


es: 


3$: 


4§; 


S$: 


6S: 


PRIFLG 
DHADR, R1 


m 
QO 


(SP)+, RO 
RO, #15 
g 


RO, DATPAT 
RO,ECe 
7$ 


ECe 


BS 
#15, PATFLG 
DPATCR 


#101,DATPAT 

DPATA 

#125, DATPAT 

DPATU 

 aceeanitiael 

DPATO 

#122 ,DATPAT 

DPATR 

#123,DATPAT 
ATS 

#102, DATPAT 

DPATB 


EXPAT3 


; TEST FOR CHANGE IN SOFT-SWR 
gt AR <CR> arerence FLAG 
AR ECHO 

‘INIT Rl TO POINT TO SCR REG 
;"PATTERN TYPE ? (A,U,D,R,S, OR 8)” 
057 cg HE TYPED 

WAS IT A <CR> 2? 
'BR IF YES 
;ECHO IT 
;GO WAIT FOR TERMINATOR 


;"SET SRO7=1 TO LOCK ON TEST PATTERN” 
;<CR> ONLY 7? 

;BR IF NOT 

;GO SEQUENCE A,U,D,R PATTERNS 
;ALTERNATING 1/0 ? 

;BR IF NOT 

;G0 DO IT 

;UP COUNT PATTERN ? 
;BR IF NOT 

;G0 DO IT 

: Bown COUNT PATTERN ? 
;BR IF NOT 

: 

;RANDOM PATTERN ? 

: NOT 

;G0 DO I 

;SINGLE CHAR PATTERN ? 
;BR IF NOT 

;GO DO I 

; TYPE ‘Not BUFFER ? 

‘60 DO I 


;"INVALID PATTERN - TRY AGAIN” 
;GO ASK AGAIN 


SEG 0077 


Lar J 
B07 
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1296 006474 O0S067 013650 DPATA: CLR -  DATCNT s INIT ITERATION COUNTER 
1297 006500 004767 012432 1S: JSR PC, SUPATA -GO SET UP THE PATTERN 
1298 006504 004767 OO1016 JSR PC DHST2 ;G0 EXECUTE IT ON SELECTED CH11 
12°99 006510 005267 013634 INC —_: DATCNT T IT 
1300 006514 026767 013642 013626 CMP PATLIM, DATCNT : DONE IT ENOUGH TIMES 
1301 006522 001366 BNE 1$ :BR IF NOT DO IT AGAIN 
1303 006524 016767 013620 172430 MOV DATCNT,SREGO § ;SAVE ITERATION COUNT 
1304 006532 005067 013612 CLR ‘INIT COUNTER 
1305 006536 012767 O06S46 172344 MOV #2$, SLPERR ‘COME BACK TO 23 
1306 006544 104017 ERROR 17 *REPORT DONE SPECIFIED NO. OF ITERATIONS 
1307 OO06546 022767 000015 013600 2s: CMP #15,PATFLG “CYCLING FOUR PATTERNS ? 
1308 006554 001001 BNE 3$ *BR IF NOT 
1309 OO065S6 000207 RTS PC RETURN TO EXECUTE NEXT »PATTERN 
1310 006560 105777 172354 33: TSTB = ASWR ;LOCK ON THIS PATTERN ? 
1311 006564 100745 BMI 1$ RIF Y 
1312 O06S566 000167 177466 IMP EXPAT3 ‘G0 ASK FOR NEW PATTERNS 
1314 006572 o0S067 013552 DPATU: CLR DATCNT ; INIT ITERATION COUNTER 
1315 006576 004767 012362 1S: ISR PC, SUPATU -GO SET UP THE PATTERN 
1316 OO6602 004767 000720 JSR PC’ DHST2 GO EXECUTE IT ON SELECTED DH11 
1317 006606 005267 013536 INC DATCNT i COUN NT IT 
1318 O06612 026767 013544 013530 CMP PATLIM,DATCNT ;PONE IT ENOUGH TIMES ? 
1313 006620 001366 BNE 1 BR IF NOT DO IT AGAIN 
1321 OO06622 016767 013522 172332 MOV DATCNT,SREGO § ;SAVE ITERATION COUNT 
1322 006630 005067 013514 CLR DATCNT’ “INIT COUNTER 
1323 006634 012767 OO06644 172046 MOV #2$, SLPERR :COME BACK TO 2$ 
1324 006642 104020 ‘ERROR 20 ?REPORT DONE SPECIFIED NO. OF ITERATIONS 
1325 OO6644 022767 OO001S 013502 2%: CMP #15,PATFLG ‘CYCLING FOUR PATTERNS ? 
1326 O066S2 001001 BNE 3$ :BR IF NOT 
1327 006654 000207 RTS PC ‘RETURN TO EXECUTE NEXT PATTERN 
1328 O06656 105777 172256 33: TSTB = ASW ;LOCK ON THIS PATTERN 
1329 006662 100745 BMI 1$ 
1330 006664 000167 177370 JMP EXPAT3 60 ASK FOR NEW PATTERNS 
1332 006670 O0S067 013454 DPATD: CLR DATCNT s INIT ITERATION COUNTER 
1333 006674 004767 012314 1S: ISR PC, SUPATD ‘GO SET UP THE PATTERN 
1334 006700 004767 O0062e JSR PC’ DHST2 :GO EXECUTE IT ON SELECTED DH11 
1335 006704 O0S267 013440 INC DATCNT :COUNT IT 
1336 006710 026767 O13446 013432 CMP PATLIM,DATCNT ;DONE IT ENOUGH TIMES 
1337 006716 001366 BNE 1S :BR IF NOT DO IT AGAIN 
1339 006720 016767 O13424 172234 MOV DATCNT,SREGO  ;SAVE ITERATION COUNT 
1340 006726 005067 013416 CLR DATCNT sINIT COUNTER 
1341 006732 012767 006742 172150 MOV #2$, SLPERR “COME BACK TO 2% 
1342 006740 104021 ERROR el ‘REPORT DONE SPECIFIED NO. OF ITERATIONS 
1343 O06742 022767 OO001S 013404 2S: CMP #15,PATFLG “CYCLING FOUR PATTERNS ? 
1344 006750 051001 BNE 3$ ?BR IF NOT 
1345 006752 O002 RTS PC ‘RETURN TO EXECUTE NEXT ,PATTERN 
1346 006754 105777 172160 3$: TSTB =: ASW ;LOCK ON THIS PATTERN ? 
1347 006760 100745 BMI $ 
1348 006762 000167 177272 JMP EXPAT3 ‘G0 ASK ‘FoR NEW PATTERNS 
1350 006766 O0S067 013356 DPATR: CLR DATCNT ; INIT ITERATION COUNTER 


1351 006772 004767 012250 1S: JSR PC, SUPATR :GO SET UP THE PATTERN 
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OZDHNB.P11 SUB-PROGRAM THREE - DATA PATTERNS TESTS 
1352 006776 004767 oD0524 JSR PC, DHSTe2 
1353 007002 005267 01334e INC DATCNT 
1354 007006 026767 013350 013334 CMP PATLIM, DATCNT 
1355 007014 001366 BNE 1$ 
1357 007016 016767 O1 172136 MOV ATCNT, SREGO 
132 Soroes oosde? B1sa58 CCR =O BATENT 
1359 007030 012767 007040 172052 MOV #2$, SLPERR 
1360 007036 104022 ERROR 
1361 007040 022767 OO00IS 013306 2%: CMP #15, PATFLG 
1362 007046 001001 BNE 33 
1363 0070S0 000207 RTS PC 
1364 007052 105777 172062 3S: TSTB = ASWR 
1365 007056 100745 BMI 1$ 
1366 060 O00167 177174 JMP EXPAT3 
1368 007064 012767 000101 013260 DPATCR: MOV #101, DATPAT 
1389 007072 004767 177376 ISR PC. DPATA 
1370 007076 012767 000125 013246 MOV #125, DATPAT 
1371 007104 004767 177462 JSR —«- PC, DPATU 
i372 007110 012767 O00104 013234 MOV #104, DATPAT 
1373 007116 004767 177546 JSR PC, DPATD 
1374 007122 012767 O00122 013222 MOV #122, DATPAT 
1375 007130 004767 177632 JSR PC, DPATR 
1376 007134 105777 172000 TSTB ss ASW 
1377 007140 100751 BMI OPATCR 
1378 007142 600167 177112 IMP EXPAT3 
1380 007145 105067 017071 DPATS: CLRB  €&C2 
1381 007152 005067 013172 CLR DATCNT 
138 7156 104401 TYP 
13 7160 030063 DPMSG7 
1384 007162 104410 3S: RDC 
38S 007164 012600 MOV (SP)+.RO 
1386 007166 122700 ooooIs CMPB = #15, RO 
1387 007172 001407 BEQ 
1388 007174 O10067 013156 MOV RO, SINGLE 
1389 007200 110067 017037 MOVB RO, EC2 
1390 007204 104401 TYPE 
1391 007206 026243 EC2 
1398 007210 000764 BR 3$ 
1294 007212 105767 017025 ug: TSTB ss Ee 
1395 007216 001003 BNE § 
139% 007220 012767 000015 013130 MOV #15, SINGLE 
1397 007226 004767 012074 13: JSR Pc, SUPATS 
1398 007232 004767 000270 JER PC’ DHST2 
ie Bee ferey OLSEN cinco © Bp Bettnomam 
1401 Me 001366 BNE  potng 
1403 007252 016767 013072 171702 MOV DATCNT, SREGO 
1404 007260 O0SO67 013064 CLR 
1405 007264 012767 007274 171616 MOV #2$, SLPERR 
1406 007272 104023 ERROR 23 
i407 007274 105777 171640 2S: TSTB so ASW 


3 


;GO EXECUTE IT ON SELECTED DH11 


: COUNT 
;DONE_IT ENOUGH TIMES 
:BR IF NOT DO IT AGAIN 


Ril AERATION COUNT 


;COME BACK TO 2S 
REPORT DONE SPECIFIED NO. OF ITERATIONS 
icyct a al PATTERNS ? 


RETURN TO EXECUTE -. PATTERN 
;LOCK ON _THIS PATTERN 


‘0 ASK FOR NEW PATTERNS 


;FLAG 1/0 PATTERN 

‘CALL FOR 1/0_ PATTERN 

PFLAG UP COUNT PATTERN 

;CALL FOR UP COUNT PATTERN 
;FLAG DOWN COUNT PATTERN 
;CALL FOR DOWN COUNT PATTERN 
; A PATTERN 


RN 
{LOCK ON ALL FOUR PATTERNS 


:BR YES 
GO ASK FOR NEW PATTERN 


;CLEAR THE ECHO BUFFER 
: INIT ITERATION COUNTER 


;"TYPE SINGLE TEST CHAR” 
iGET CHAR 

sGET WHAT HE_ TYPED 

{WAS IT A <CR» 


;BR IF YES 
:SAVE IT FOR Ses BUFFER 
ECHO IT ON T 


;GO WAIT FOR TERMINATOR 
;WAS SINGLE CH A <CR> 2? 
;BR_IF A <CR> ONLY 


T ONE TIM 
DON REQUIRED ITERATIONS ? 


;SAVE ITERATION COUNT 

INIT ITERATION COUNTER 

:COME BACK LWAYS 

REPORT DONE SINGLE CHAR | rare 
;LOCK ON THIS PATTERN ? 


SES 0079 
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14 7 7 M 1$ ;BR IF YES 
Libs BAe abe sabes 176752 aM EXPAT3 :GO ASK FOR NEW PATTERN 


MAINDEC-11-DZDHN-B 
DZDHNB.P11 


007340 


007342 
007350 


007352 
007356 


007360 
007366 


097522 


SUB-PROGRAM THREE - DATA PATTERNS TESTS 
DPATB: 


022767 
001423 


020527 
001420 


022767 
001011 


000744 


116725 
000741 


112767 


000167 


MACY11 27(732) 


013036 
032776 


013026 
013022 


000003 
033777 
o0001e 


013044 
012756 
013032 


012740 


000136 
000103 


032776 
012130 


012674 
012652 
My 644 
07514 
171420 
176532 


016705 


013006 


012770 


C12660 


171462 
171376 


EQ 
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1$: 


11S: 


2s: 


3$: 


4§: 


S$: 


CLR 
TYPE 
Aa 


DATCNT 


#TBUF ,RS 


(SP)+, SINGLE 
SINGLE, EC2 


#3, SINGLE 

3$ 

RS, #TBUF +513. 
3$ 

#12, SINGLE 
es 


FILLB,RO 
SINGLE, (RS)+ 
FILLA, (RS) + 


11$ 
1$ 


SINGLE, (RS)+ 
1$ 


#TBUF ,RS 

RS 

RS, CHRCNT 
PC,DHSTe 
DATCNT 
PATLIM, DATCNT 
4$ 

DATCNT, SREGO 
DATCNT 

#5$, SLPERR 
24 

aSWR 

4$ 

EXPAT3 


7? 


t 


; INIT ITERATION COUNTER 


;"TYPE IN BUFFER - TERMINATE WITH CONTROL-C” 
et cae i BUFFER 


AVE IT 
ECHO IT 


;WAS IT A CONTROL-C ?? 
;BR IF YES 

;BUFFER FULL ?? 

;BR IF YES 

;WAS IT A LINE FEED ?? 
;BR IF NOT 

;LOAD LF PLUS FILLERS 
;LOAD A FILLER CHAR 


;BR TILL REQUIRED FILLERS LOADED 
GO ASK FOR ANOTHER CHAR 


;LOAD IT IN BUFFER 
:GO GET NEXT CHAR 


;ECHO CONTROL-C 


;SET UP CHAR COUNT 


;GO EXECUTE PATTERN 
;DONE_REQUIRED ITERATIONS 
;BR IF NOT 


;SAVE ITERATION COUNT 
INET A at Na COUNTER 


DONE REQUIRED LTERAT IONS 
;LOCK ON_THIS BUFFER 


60 ASK FOR NEW PATTERN 


SEG 0081 
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1460 sprees 04767 005122 DHST2: JSR PC, DHSET1 GO_SET_UP THE DH11 

1461 007 56761 011776 Ooodle2 BIS LINMSK,BAR(R1) ACTIVATE THE LINE 

le 00 004767 011662 JSR PC, CHPS1 GO CLEAR PSW 

1464 007544 012767 OO0100 012566 PTWAIT: MOV #100, TIMEA INIT TIMERS 

1465 0075S2 005067 012564 CLR TIMER 

1466 007556 005767 Ol2e0e6 1: TST RDONE ;DONE ENTIRE PATTERN ? 

1467 007562 001023 BNE 3$ ‘BR IF YES 

1468 007564 004767 007324 JSR PC, TIMEIT ‘CALL THE TIMER 

1469 007570 000772 BR 1$ “EXECUTED IF NO TIMEOUT 

1471 007572 012777 OO4O00 011722 MOV #B1T11,9DHADR ;CLEAR THE DH11 

1472 007600 016767 012544 171354 MOV DATCNT;S$REGO § :SAVE ITERATION COUNTER 

1473 007606 016767 Ole540 171350 MOV DATPAT SREG] SAVE PATTERN TY YPE 

1474 007614 012767 007624 171265 MOV , SLPER SET UP ERROR RETU 

1975 007622 104025 ERROR ae :DATA PATTERNS rot TIMEOUT ERROR 

1477 007624 005726 23: TST (SP)+ FIX STACK SINCE WE ARE SKIPPING RTS 

1478 007626 O0D167 176426 IMP EXPAT3 !G0 ASK FOR NEW PATTERN 

1480 007632 052711 oo4o00 3S: BIS #31T11, (RL) :CLEAR THE DH11 

1481 007636 004767 O00740 JSR PC, CKERDP GO CHECK DATA SUFFERS 

1482 007642 o00207 RTS PC’ ‘RETURN TO CONTROL ROUTINE 


MAINDEC-11-DZDHN-8 
Pll 


DZOHN 


MACY 
SUB-PROGRAM 


tant 2 "Bara Patt 


a 


007726 


nae 


007736 


010020 
010024 


010026 


010074 


011103 


0051 


000167 


011103 
100431 


004767 


0100 


60816? 
005761 
001430 


004767 


cooo 
0114 
0000 


0000 


104003 


007722 


544866 


Oleete 
175760 


005226 


36 


171170 


176326 


011500 


780600 


012174 
077760 


005140 
005050 


10 1711Ce 


176240 


le 


10 
le 


004000 


le 


005052 
004762 


010076 171014 


P-76 
ERNS T 


b8:89 PAGE 38 


~ 


SEG 0083 


; TRANSMITTER INTERRUPT SERVICE ROUTINE THREE 


TINT3: 


1$: 


2s: 


3$: 


4$: 


Be 


L 
EM3+SS5 
MOV 
ERROR 


ggtt10, (RL) 


ee 
aay ver) 
pes R3 
PC’ SUERI 
RS; SUNUM 
#15, SLPERR 
($P)+, (SP)+ 
(SP)+ 
EXPAT3 
(R1),R3 
4g 


# 
si 
Line R3 
R1,Re 

PC’ SUERI 
RS; SUNUM 


bia 


#3$, SLPERR 
(SP)+, (SP)+ 
(SP)+ 
EXPAT3 
BAR(R1) 

6$ 

An 


CH 
BAA 1).R 
4BITL1 tL th 


RS; SUNUM 


466, LEM 


AONE NDE ERROR °? 


;SAVE THE SCR 
oats tat He Oa 


;SET UP THE S/B D ! 
baat Our gees BITS | 


O SET UP ERROR INFO 
G0 SET UP LINE NO. IN MSG 


;SET UP THE ERROR LOOP RETURN 
; NON EX MEM ERROR 


FOR UHick STNCE NO_RTS IS EXECUTED 
GO ASK FOR NEW PATTERN 


;GET_THE SCR REG CONTENTS 
:BR IF XMIT DONE SET 


sep AR TH 0 ke rata ERROR 
CLEAR UP S/B BATA . 


s CLEAR OUT SUPERFLUOUS BITS 

;SET F Ip che 

:GO SET UP ERROR INFO 

:GO SET UP LINE NO. IN MSG 

;SET UP ERROR LOOP RETURN 

:XMITTR FALSE INTERRUPT 

;POP THE STACK 

FIX STACK SINCE NO_RTS IS EXECUTED 
:G0 ASK FOR NEW PATTERN 


DID BAR BIT CLEAR ?? 
;8R IF YES | 
;GO_LOCK OUT INTRS } 
:SE 

;SET UP REGAOR 

;G0 SET UP ERROR INFO 

;G0 SET UP LINE NO. IN MSG 


;SAVE THE ERROR LOOP RETURN 
:BUFFER ACTIVE REG FAILED TO CLEAR 


HO? 
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4 ? S$: M (SP)+, (SP)+ ;POP STACK 

feds BIB?GR BBESSE fae feb EOE eta ee tNgeNS RTS IS EXECUTED 

1543 010102 O00167 176152 IMP EXPAT3 60 ASK FOR NEW PATTERN 

154 10 S761 oo0010 6S: TST R(R1) :DID_ BYTE COUNT GO TO ZERO 7? 

Hele S18198 BBIZ&S a BPP Es 

1548 010114 004767 011322 JSR PC, CHPS2 :GO LOCK OUT INTRS 

1549 010120 016103 000010 MOV BCR(R1).R2 ‘GET THE WAS DA 

1550 010124 O12711 004000 MOV #81711, RI) ‘CLEAR THE DH11 

1551 010130 ooS004 CLR RY :SET UP S/B DATA 

1552 010132 010102 MOV R1,Re :SET UP REGADR 

1553 010134 Ob2702 000010 ADD #BCR, Re 

1554 010140 004767 004764 JSR PC, SUERI :GO SET UP THE ERROR INFO 

1555 010144 004567 004674 JSR RS, SUNUM -GO SET UP LINE NO. IN MSG 

1556 010150 O221Se 

1557 010152 023025 EM4Y+S2 

1558 010154 012767 010164 170726 MOV #7$, SLPERR ;SET UP ERROR LOOP RETURN 

1559 010162 104004 ERROR 4 BYTE COUNT REG FAILED TO GO TO oD0000 

1560 010164 OGee626 7S: CMP (SP)+, (SP)+ *POP GOES THE STACK 

1561 010166 005726 TST (SP)+ ‘FIX STACK SINCE NO RTS IS EXECUTED 

156 010170 000167 176064 JMP EXPAT :GO ASK FOR NEW PATTERN 

1564 010174 016103 oo0006 8S: MOV CAR(R1),R3 :GET THE WAS DATA 

1565 010200 616704 011376 MOV CHRCNT, RY -SET UP S/B DATA 

1566 010204 o05404 NEG 4 

1567 010206 062704 032776 ADD #TBUF RY 

1568 O10212 020304 CMP R3. RY ;WAS CAR CORRECT ?? 

1563 010214 001423 BEQ 10$ :BR IF YES 

1571 010216 004767 011220 JSR PC, CHPS2 ;GO LOCK OUT INTRS 

1572 010222 O10102 MOV R1.Re :SET UP REGADR 

1573 010224 062702 ooD006 ADD #CAR, Re 

1574 010230 004767 004674 JSR PC, SUERI ;GO SET UP ERROR INFO 

1575 010234 OO4S67 OO4604 JSR RS, SUNUM :GO SET UP LINE NO. IN MSG 

1576 010240 O2215e 

1577 010242 023107 EMS+57 

1578 o10244 012767 010254 170636 NOV #95, SLPERR iseT Ue Tis ERROR RETURN a 

12 p88 49300° QS: ERB (SP)+, (SP)+ + BOP BNE eORRE 

1581 010256 005726 TST (SP)+ : FIX STAC SINCE NO RTS IS EXECUTED 

1682 010260 000167 175774 JMP EXPAT3 :GO ASK FOR NEW PATTERN 


1S&4 010264 c00c02 10$: RTI 


MAINDEC-11-DZDHN-B 
SUB-PROGRAM 


DZDHN 


-Pil 


BIBER 


010274 


as 
Re 
010352 
010354 


010436 


010442 
0104S0 


010524 


Bard} 


004767 


Oe > 6 
B08i6? 
10S711 
100432 


004767 


005726 
000167 


016167 
100427 


004767 


000167 


040000 
011142 


004000 
177760 


011634 


Bowele 
010342 


175706 


011060 
177560 


oge00 


O11S546 
peas 
O44e2 
010432 
175616 
000002 


010764 


004340 


010520 


175530 


RAM THREE — Bata‘ PA 


170550 


170460 


170532 


020022 


170372 


; 
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ERNS TESTS 


;RECEIVER INTERRUPT SERVICE ROUTINE THREE 


RINT3: 


1$: 


es: 


33: 


4: 


S$: 


Bed 


ygITi4, (RL) 


PC CHPS2 
8 (BHR kee (R1) 
#177760, R3 
LINE,RY 
PC » SUERI 
UNUM 
#1$,$LPERR 
(SP)+, (SP)+ 
P)+ 
EXPAT3 
(R1) 
4 


o 


PC, CHPS2 
R 3 


#3$, SLPERR 
(SP)+, (SP)+ 
(SP)+ 
EXPAT3 


NRC(R1), STMPO 
6$ 


PSe2 
eety it (R1) 
sRBUF RBEPTR 

perc TR.R 
Base 
RS, SUNUM 


a, SLPERR 
(SP)+, (SP)+ 
26 }}° s 
EXPAT3 


BAT NBT CO ERROR ?? 


;GO_ LOCK OUT INTRS 


be “ELE THE DF 


- SET UP E “a” ng 
;GO SET UP LINE NO. IN MSG 


;SET UP ERROR LOOP RETURN 
ee aoa * -' BAD,BAD !!! 

X STACK CENCE NO_RTS IS EXECUTED 
iE ak FOR NEW he le 


CHAR AVAIL SET ?? 

:BR IF YES 

;@0 LOCK QUT INTRS 
jGET WAS DATA 


a § CoE i 


‘ee UP REGADR 


GO eet Ue UP ERR ,* NFQ 
T UP LIN . IN MSG 


SET _UP a ERROR LOOP RETURN 
Rec VER +a ® INTERRUP 


FIX STACK "Since NO_RTS IS EXECUTED 
:G0 ASK FOR NEW PATTERN 


;SAVE_THE DATA RECEIVED 
;BR IF IT WAS VALID DATA 


360 Lo OUT gn 


‘G0 SET UP LINE NO. IN MSG 


;SET UP ERROR ay 
; RECEIVED {VALID DAT 


STACK 
iB OE a, g nee NO RTS IS EXECUTED 
G0 ASK FOR NEW PATTERN 


SES 008s 


~ 
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1641 
1642 010530 016777 170446 017754 65: MOV S$TMPO,QJRBFPTR  ;STORE CHAR IN THE BUFFER 
1643 010536 062767 O00001 017746 ADD #1 RBEPTR UFBATE THE POINTER 
1644 010544 026767 011042 B17o4 CMP REFEND, REFPTR END OF BUFFER ?? 
1645 010552 001407 BEQ ;BR IF YES 
1646 010554 062767 000001 017730 ADD BFPTR 
1647 010562 026767 011024 017722 CMP R 1 Ber RBFPTR 
1648 010570 001003 BNE 8 ;BR_IF NOT DONE 
1649 010572 OSe767 000001 011010 7$: BIS #1, RDONE SET SOFTWARE DONE FLAG 


1650 010600 o00c0e 8S: RTI : RETURN TO WAIT LOOP 


MAINDEC-11-DZDHN-B 


DZOHNB.P11 


010602 
010610 


010722 
010724 
010726 


bioves 
010766 


MACY11 27(732) 
SUB-PROGRAM THREE - DATA PATTERNS TESTS 


TUS AIAN, BAER ES 


:FOR THE DAT 

012767 030516 017702 CKERDP: MOV 
012767 032776 017676 MOV 
117704 017672 1$: MOVB 
000304 SWAB 
105004 CLRB 
156704 011320 BISB 
000304 SWAB 
S2704 100000 BIS 
046704 011524 BIC 
017703 O1764e MOV 
020304 CMP 
001425 BEQ 
010367 170340 MOV 
010146 MOV 
016701 017624 MOV 
016702 017622 MOV 
010200 MOV 
162700 032776 SUB 
004767 004220 JSR 
Q0O04S67 004134 JSR 
022152 LINE 
023435 EM11+23 
012767 010724 170166 OV 
104011 ERROR 
012601 es: MOV 
005267 017562 3$: INC 
062767 000001 017552 ADD 
026767 010646 017544 CMP 
001407 BEQ 
O62767 000001 917534 ADD 
026767 010630 017526 CMP 
001314 BNE 
000207 4$: RTS 


27-SEP-76 (16:09 PAGE Ye 


#RBUF , RBFPTR 
#TBUF , TBFPTR 
JTBFPTR, RY 
RY 

RY 

LINE,R4 

RY 

#81T1S RY 
LMSK 
aroretn, R3 


re » STMP7 


PC, 2 
RS; SUNLA 

#25, SLPERR 

il 

(SP)+,R1 

#1 RBFPTR 
REFEND, REFPTR 
#1 ,RBEPTR 
REFEND, RBFPTR 


PC 


‘f 


SEG C087 


CHECK THE RECEIVED DATA AND REPORT ALL ERRORS 


;SET UP POINTERS 


;GET THE S/B DATA 
;PUT LINE NO. IN HIGH BYTE 


;AND FINALLY THE a dy BIT 
‘MASK OFF BITS NOT XMITTED 
;GET THE WAS DATA 
WAS = S/B 7777? 
BR IF YES 


;SAVE THE WAS DATA 

SAVE THE DEVADR 

GET THE SBADR 

GET THE WASADR 

:GET wal er ree ADOR 

GENERATE CHAR 

GO SET UP ERROR INFO 

:GO PUT LINE NO. IN MSG 

;SET UP ERROR RETU 

;DATA COMPARE ERROR OR PARITY, FRAMING 


;0 RR 
RESTORE THE DEVADR 


;UPDATE POINTERS 


BR IF YE ALL CHARS ?? 
; UPDATE Ed, AGAIN 
BR iF ROT 


;RETURN TO WAIT LOOP 


MAINDEC-11-DZDHN-B MACY11 27(732) 
DZDHNB.P11 END 


010770 


OOOO OOOO OKOOVO OOOO OO000000 
be pe he be fe ae fe be fe pe fe pe pe fe fe pe oe he 
— 


OF PASS ROUTINE 


70232 
o00000 170224 


Te7%e 170200 


104401 011072 
013700 O0004e 


000137 
sean 


osohts BERLE BLS 


000043 


104407 


011032 
032777 O40000 170012 
001104 


~ 
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.SBTTL END OF PASS ROUTINE 


5 REAR RR REEIEIEIEIEHEEEEEER REEEEEIE EEE EEE EEEAEEER EEE 
}HINCRENENT THE PASS NUMBER ($PASS) 
E “END PASS #XXXXX" (WHERE XXXXX IS A DECIMAL NUMBER) 


iE "THERE SAPP RIG! 9B Lak 


SEOP: 
SCOPE 
CLR —- STSTNM :;ZERO THE TEST NUMBER 
CLR  $TIMES j;ZERO THE NUMBER. OF ITERATIONS 
INC $PASS ‘INCREMENT THE PASS N 
BIC _ &100000, SPASS 11 DON NT ALLOW A NEG. NUMBER 
DEC (PC)+ LOOP? 

SEOPCT: .WORD 


tee ;;YES 
MOV (PC)+,a(PC)+ ;;RESTORE COUNTER 
$ENDCT: .WORD 1 


SEOPCT 
YPE SENoNG ;;TYPE "END PASS # 
MOV $PASS, -(SP) >:SAVE SPASS FOR + VPEOUT 
TYPDS ::GO TYPE--DECIMAL ASCII WITH SIGN 
TYPE SENULL TYPE A NULL CHARACTER 
$GET42: MOV d#42, RO ::GET MONITOR ADDRESS 
SDOAGN ::BRANCH IF NO MONITOR 
RESET CLEAR THE WORLD 
SENDAD: JSR PC, (RO) G0 TO MONITO 
NOP ;; SAVE 
NOP ;;FOR 
NOP :ACT1I1 
SDOAGN: 
IMP a(PC)+ ; ;RETURN 
SRTNAD: .WORD START 


SENULL: .BYTE NULL CHARACTER STRING 
SENDMG: .ASCIZ c18) ¢12> “END pass’ # 
.SBTTL SCOPE HANDLER ROUTINE 


5 5 REE REREER ERE R EE EERE EERE EEE EH EE EEE EEE RARE EE EEE EEE REESE 
; ATHIS ROUTINE err ent LOOPING OF SUBTESTS. IT WILL INCREMENT 


 xAN 3 AO THE RROR "tL AG (SERFLG) HTD OTR gttt :08> 


j THE H OP TONS PR OVIDE BY TH 
i eulie i TNHIBS? ITERATIONS 
; #SUO3=1 LOOP ON ERROR 
te SCOPE ; ;SCOPE=IOT 
$SCOPE: 
CKSWR “TEST FOR CHANGE IN SOFT-SWR 
CLR LINE ‘iNIT LINE COUNTER 
1S: BIT #B1T14, ISWR 5 LOOP ON PRESENT TEST? 
BNE SOVER +: YES IF SW 


SEG 0088 


MAINDEC-11-0Z2DHN-B 
OZOH 


NB.P1L 
{$44 011130 
1751 

1782 011132 
1725 O11 36 
i784 O11144 
1755 011180 
1728 o111e4 
172? O111e6 
1788 O111e0 
1724 O11164 
ee 
toes Bt iiss 
1763 OL1174 
i764 011202 
1765 011204 
1766 Olizl2 
i au 
toes Bt t554 
1770 011230 
1771 011234 
1772 011236 
1773 11244 
1774 O11246 
1775 Ollese 
1778 011264 
1777 011260 
1778 O112e6 
1778 011270 
1780 011276 
1781 011304 
1782 011310 
1783 011316 
784 01132 
1785 01133 
1786 011332 
1787 O11340 
1788 011346 
1789 011352 
1796 011369 
1791 

1792 

1793 

1794 

1795 

1796 

i797 

1798 

1749 

1e00 

1801 

1802 

1603 

1805 011256 


000416 
he 


000010 


MACY11 27(732) 
SCOPE HANDLER ROUTINE 


000004 
011156 
177060 
000004 


ooo004 


167711 
167715 
001000 
167670 


167653 
167766 


004000 
167766 


167624 
167736 


oooo04 


167701 
167726 
167664 


167674 


167616 


167606 
167716 


167720 


167555 
167574 


La J 


27-SEP-76 16:09 PAGE 44 


rT * == rit ROAATKc ON THE “XOR” TESTER CHANGE 


THIS INSTRUCTION TO_A_ “NOP” (NOP=240) 
MOV O#ERRVEC, -(SP) t SAVE THE C ot Mia TS OF THE ERROR VECTOR 


MOV #SS. JHERRVEC isSET 4 TIME 
TST 34177060 xOR? 
MOV oft JHERRVEC RESTORE TH THe ERROR VECTOR 
BR $SVLAD TEST 
S$: CMP (SP)+, (SP) : CLEAR THE STACK fT AFTER A TIME OUT 
MOV (p)4? SREARVEC i SRESTORE ERROR VECTOR 
BR ON THE PRESENT TEST 
6$:;##8HEND OF CODE FOR THE non 'TESTeReays 
2S: TST SERFLG HAS AN RROR OCCURRED? 
BEQ 3 BR IFN 
CMPB § $ERMAX, SERFLG :IMaX, ERRORS FOR THIS TEST OCCURRED? 
BHI 3$ :BR IF NO 
BIT 4B1T09, aSHR 90 oN ERROR? 
7S: NOV SLPERR,SLPADR ;:SET LOOP ADDRESS TO LAST SCOPE 
ug: CLRB ERFLG :;ZERO THE ERROR FLAG 
CLR STIMES js CLEAR THE NUMBER OF ITERATIONS TO MAKE 
BR 1$ ESCAPE TO THE NEXT TEST 
3S: BIT #B1T11, aSKR ; j INHIBIT ITERATIONS? 
TST SPass ttIF FIRST T Pass OF PR PROGRAN 
BEQ INH ONS 
INC SICNT js INCRENENT ST ERATION wets 
CMP STIMES,SICNT  ;;CHECK THE NUMBER OF SO UNATIONS MADE 
BGE SOVER ‘BR IF MORE ITERATION REQUIRED 
1S: MOV j SREINITIALIZE THE ITERATION COUNTER 


#1, SICNT 
MOV SMXCNT, STIMES + R OF ITERATIONS TO DO 
$SVLAD: INCB $TSTNM’ i RBUN TE TT MBER Rime Re 
MOVB § STSTNM, STESTN ay TEST NUMBER IN APT MAILBOX 
MOV (SP), $LPADR -SAVE SCOPE LOOP ADDRESS 
MOV sr a tt Cave ERROR LOOP A DRESS 

§ SCA is CLEAR THE ESCAPE FROM ERROR ADDRESS 


CLR 
MOVB sONLY ALLOW ONE(1) ERROR ON NEXT TEST 
SOVER: MOV STStnn SDISPLAY  OISALAY TEST NUMBER 
MOV SLPADR, (SP) FUDGE RETURN ADDRESS 
RTI : :FIXES PS 
SMXCNT: 10 t MAX. NUMBER OF ITERATIONS 


"SBTTL. ERROR HANDLER ROUTINE 


5 MARAE REE HEHEHE HEHEHE EAE EE EEE HEHEHE MEE HE REE EE HEHEHE EE REE EERE EEE EE 
t ATHIS ROUTINE WILL_ INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
;¥SAVE THE ERROR sen NUMBER AND THE ADDRESS OF THE ERROR CALL 

; XAND GO TO SERRTYP ON ERROR 

+ Bee ries PROVIDED BY THIS ROUTINE ARE: 


HAL 
 xSW13=1 INHIBI? ERROR TYPEOUTS 
: ¥SW09=1 LOOP ON ERROR 


L 
;% ERROR N 
SERROR: 


;;ERROR=EMT AND *N=ERROR ITEM NUMBER 


SEG 0089 


- 
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OZDHNB.P11 ERROR HANDLER ROUTINE SEG 0090 

T FT-SWR 

tebe Bthseb BeZe> ezsiz 7s: NRE" sereic Higer THE" enon FLA ee 

1807 011364 001775 BEQ 75 LET THE FLAG GO TO ZERO 

1808 011366 016777 167510 167546 MOV STSTNM, DISPLAY + OT SpL AY TEST NUMBER AND ERROR FLAG 

1809 011374 O0S267 167512 INC SERTTL INC THE ERROR COUN 

1810 011400 011667 167512 MOV (SP), SERRPC ::GET ADDRESS OF ERROR INSTRUCTION 

1811 O114O4 166767 ODODNE 167504 SUB #2, SERRPC 

1812 011412 117767 167500 167474 MOVB  a@SERRPC, SITEMB j STRIP AND SAVE. THE ERROR ITEM CODE 

1813 Ol14e0 032777 20000 lé7sie BIT #81713, 0SKR ss8KTP TYP SET 

1814 O114 1004 BNE tt 

1815 011430 004767 000074 JSR PC, SERRTYP ::G0 TO TISER JERROR ROUTINE 

1816 011434 104401 001227 TYPE  ,SCRLF 

1817 011440 20S: 

1818 O1NNO 122767 000001 167604 CMPB —s- SAPTENV, SENV : RUNING IN APT MODE 

1819 011446 001007 BNE 25 NO, SKIP APT ERROR REPORT 

1820 011450 116767 167440 OO0004 MOVB  SITEMB,21$ ::SET ITEM NUMBER AS ERROR NUMBER 

1821 011456 004767 001174 JSR PC, SATYY : }REPORT FATAL ERROR TO APT 

1822 011462 000 21$: BYTE 

1823 011463 000 ‘BYTE 0 

1824 011464 000777 225: BR 225 ; ;APT_ERROR LOOP 

1ge5 O114e— 005777 167446 2s: TST GSU :HALT ON ERROR 

1826 011472 100002 BPL 3 tisk p 4 CONT INUE 

1827 011474 o00000 HALT HALT ON ERR 

1828 011476 104407 CKSWR :: TEST FOR CHA NGE IN SOFT-SWR 

1829 011500 032777 001000 167432 3S: BIT #81709, JSWR Soe ON ERROR SWITCH SET? 

1830 011506 001402 BEQ 4 

1831 011510 O16716 167374 MOV SLPERR, (SP) iF &r RETURN FOR LOOPING 

1832 911514 GOoS767 167504 4S: TST SESCAPE j | CHECK FOR AN ESCAPE ADDRESS 

1833 011520 001402 BEQ os 

1834 011522 O16716 167476 MOV SESCAPE, (SP) + Fpee RETURN ADDRESS FOR ESCAPE 

1835 011526 cS: 

1836 011526 ooo002 RTI ETURN 

1837 'SBTTL ERROR MESSAGE TYPEOUT ROUTINE 

1839 : pNTS ROUTINE USES THE “ITEM CONTROL BYTE” (SITEMB) 10 DETERMINE 

1840 jATHIS ROUTINE USES. THE PITEM CONTROL BYTE" (SITENB) TO DETERMINE WHICH 

41 R PORTE HEN OBTAINS, FROM THE “ERROR TABLE” (SERRTB), 

p42 ;*AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR. 

1844 Q11 RRTYP: 

teu Bt1230 104401 oo1ee7 = TYPE SCRLF ; ;@CARRIAGE RETURN 8 “LINE FEED" 

1846 011534 O10046 MOV RO, -(SP) *:SAVE RO 

1847 01153 005000 sated CLR Cee ai :;PICKUP THE ITEM INDEX 

1B Bitedg = Aetobe BAe a4 ;;1F ITEM NUMBER IS ZERO JUST 

1851 011546 O16746 167344 MOV SERRPC,-(SP)  }!SAVE SERRPC FOR TYPEOUT 

1852 ; ERROR ADDR 

1853 O115S2 104402 TYPOC ;3G0 TYPE--OCTAL ASCII(ALL DIGITS) 

1854 11554 Goose BR 10$ 0 

1855 011556 005 1S: DEC RO ; }ADJUS THE INDEX SO THAT IT WILL 

1856 O11560 006300 ASL RO $3 WORK FOR THE ERROR TABLE 

1857 011562 006300 ASL RO 

ies Hie a 8 

1859 011 001356 AD #SERRTB, RO ;;FORM TABLE POINTER 

1866 011572 012067 000004 MOV (RO)+, 28 ;;PICKUP "ERROR MESSAGE” POINTER 


hea'p | in” 
ERROR MESSAGE TYPEOUT ROUTINE 


DZDHNB.P 


011700 


001404 


03 
104401 
000764 


012601 


011704 


MACY11_27(732) 


001227 


000004 


001227 


011700 


001227 
000 
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BEQ 3$ 53 SKIP TYPEQUT IF NO POINTER 

TYPE +: TYPE THE "ERR SSAGE" 
23: .WORD O : "ERROR eceace™ POINTER GOES HERE 

TYPE $CRLF ': "CARRIAGE RETURN” & “LINE FEED" 
38: MOV (RO)+,4S ‘PICKUP "DATA HEADER” POINTER 

BEQ c$ ::SKIP TYPEOUT IF 0 

TYPE js1YPE THE “DATA HEADER” 
4g: .WORD O "DATA HEADER” POINTER GOES HERE 

TYPE SCRLF : “CARRIAGE RETURN” & “LINE FEED" 
cs: MOV R1.-(SP) 

MOV (RO)+,Ri : PICKUP “DATA TABLE” POINTER 

BEQ 13 *BR IF NO DATA TO BE TYPED 

MOV (RO)+,RO j PICKUP, “DATA FORMAT" POINTER 
6S: TSTB RO)+ CTAL” OR “DECIMAL” 

BNE 7$ BR IF DECIMAL 

MOV a(R1)+, -(SP) ::SAVE J(R1)+ FOR TYPEOUT 

TYPOC G0 TYPE--OCTAL ASCII(ALL DIGITS) 
- BR 8S 

MOV 3(R1)+,-(SP) ;;SAVE 3(R1)+ FOR TYPEOUT 

TYPDS 1160 YPE--DECIMAL ASCII WITH SIGN 
8S: TST (R1) :IS THERE ANOTHER NUMBER? 

BEQ 9$ NO 

TYPE 11$ ee TWO(2) SPACES 

BR 6$ :LOOP 
9S: MOV (SP)+,R1 ; ;RESTORE RI 
i0$: MOV (SP)+/RO :RESTORE RO 

TYPE gackLF $1 ene RETURN” & “LINE FEED” 
118: ASCIZ 7 / :: TWO(2) SPACES 


EVEN 
. SBTTL BINARY TO OCTAL (ASCII) AND TYPE 


5 HERE HER HE ESE IE IESE SE SESE SESE SEE SEE ES SEE EEE EE SEE SEE EEE EE EE EE EEE SEE EE EEE 
: ATHIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 
;XOCTAL (ASCII) NUMBER AND T 
j #STYPOS---ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 


>¥CQ Ls: 

¥ MOV NUM, -(SP) ;;NUMBER TO BE TYPED 

# TYPOS js CALL L_FOR TYPEOUT 

:% -BYTE N N=1 TO & FOR NUMBER OF DIGITS TO TYPE 
+" BYTE MM ;;M=1 OR O 

:% ;;1=TYPE LEADING ZEROS 

i ;;O0=SUPPRESS LEADING ZEROS 


; ¥STYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
j #$1YPOS OR STYPOC 


tt MOV NUM, -(SP) ;;NUMBER TO BE TYPED 
i# TYPON »:CALL FOR TYPEOUT 

| #STYPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 
ie nov NUM, -(SP) ;;NUMBER TO BE TYPED 


;% TYPOC ;;CALL FOR TYPEOQUT 


SEG 0091 


o~ 
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DZDHNB. P BINARY TO OCTAL (ASCII) AND TYPE SEG c092 
1917 
1918 011704 017646 o00000 STYPOS: MOV a(SP),-(SP) j PICKUP THE MODE 
1919 011710 116667 000001 000211 MOVB 1(SP);S$OFILL § ;;LOAD ZERO FILL SWITCH 
1920 011716 112657 000207 MOVB  (SP)+'SOMODE+1 ;;NUMBER OF DIGITS TO TYPE 
1921 011722 062716 000002 ADD #2, (SP) ::ADJUST RETURN ADDRESS 
1a55 pt teSe Tee 000001 000171 S$TYPOC GV TYE -SET THE ZERO FI L SWITCH 
1924 Ot toa 116282 000006 Soo1ee MOV te’ SOMODE +1 + SET Ge oho IGITS 
1925 011744 112767 OO000S5 000154 STYPON: MOVB  4#5,SOCNT 5867 THE ITERATION COUNT 
1926 011756 010346 MOV R3,-(SP) SAVE R 
1927 011754 O10446 MOV RY, -(SP) is SAVE Ra 
928 011756 O10S46 MOV RS. -(SP) SAVE RS 
1929 011760 116704 o0014S MOVB  $OMODE+1,R4 CET THE NUMBER OF DIGITS TO TYPE 
1930 011764 O0S5404 NEG RY 
1931 011766 062704 oo00006 ADD #6,R 5 SUBTRACT IT FOR MAX. ALLOWED 
ise Gllzee lea Geel Se a ee ee 
1934 0120 AteeBe oo0012 MOV 13S; RS i err THE INPUT NUMBER 
1935 012006 005003 CLR ::CLEAR THE OUTPUT WORD 
1936 012010 006105 1S: ROL ;;ROTATE MSB INTO "C* 
1937 Ole012 o00404 BR Re zi 
1938 012014 006105 2s: ROL RS FORM THIS DIGIT 
1939 012016 005105 ROL RS 
1940 012020 006105 ROL 5 
1941 Ole022 010503 MOV R5,R3 
1942 012024 006103 3S: ROL R3 :;GET LSB OF THIS, DIGIT 
1943 012026 105367 o00076 DECB  SOMODE ;;TYPE THIS DIGIT? 
1944 012032 100016 BPL 7§ $3 NO 
1945 012034 042703 177770 BIC #177770,R3 }3GET RID OF JUNK 
1946 Ol2040 o01002 BNE 4§ ‘TEST FOR O 
1947 012042 005704 TST RY j 5 SUPPRESS THIS 0? 
1948 012044 001403 BEQ o$ 
1949 012046 005204 4S: INC RY DON? T cFBpREss ANYMORE 0°S 
1950 012050 052703 o00060 BIS #’0,R3 i MAKE THIS DIGIT ASCII 
1951 012054 052703 oo0040 S$: BIS #’ | R3 : MAK AScTy i NOT ALREADY 
1952 01 110367 000040 MOVB R3, 8S :?Sq ING 
1953 012064 104401 012124 TYPE 8 ;;G0 TYPE THIS DIGIT 
1954 012070 105367 000032 7$: DECB © S$OCNT BY 1 
195S 012074 003347 BGT 2 ;3BR IF MORE TO DO 
1956 012076 O02402 BLT 6 :B 
1957 012100 o0S204 INC RY js INSURE LAST DIGIT ISN’T A BLANK 
958 012102 000744 BR 2S ::G0 DO THE LAST DIGIT 
1959 012104 O12605 6S: MOV (SP)+,RS RESTORE RS 
1960 012106 O12604 MOV (SP)+,R4 sr RES TOR R4 
1961 012110 012603 MOV (SP)+'R3 REST ORE R3 
1962 Olell2 Ol6666 oo0002 oDD004 MOV 2(SP)'4(SP) ::SET THE STACK FOR RETURNING 
1963 O12120 012616 MOV (SP)+’ (SP) 
1964 Olel2e2 oodn02 RTI ; sRETURN 
1965 012124 000 8S: .BYTE O :: STORAGE FOR ASCII DIGIT 
1966 Oleles 000 "BYTE 0 ji TERMINATOR FOR TYPE ROUTINE 
1967 012126 000 SOCNT: .BYTE 0 *:OCTAL DIGIT COUN TER 
1968 012127 000 SOFILL: .BYTE 0 i 5 ZERO. FI LL L Su ITCH 
1969 012130 o00000 SOMODE: :WORD 0 NUMB: IGITS TO TYPE 
1300 "SBTTL. CONVERT BINARY TO DECIMAL.’ AND eRe F ROUTINE 


197¢ 5p RERRRRRE REE RARER EERE REE REEL LEAR ERE AER ER RAE ERE LR RAR ELE RA ELE RE 
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DZDHNS.P11 CONVERT BINARY TO DECIMAL AND TYPE ROUTINE SEG 0093 
197 ;*THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A S-DIGIT 
1974 ?¥SIGNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHER THE 
1975 :¥NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED 
1976 :¥BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 
1977 j SREPLACED WITH SPACES. 

1979 ty MOV NUM, - (SP) ;;PUT THE BINARY NUMBER ON THE STACK 
1986 tk TYPDS ::GO TO THE ROUTINE 
1982 012132 $TYPDS: 
1983 012132 010046 MOV RO,-(SP) ;;PUSH RO ON STACK 
1984 012134 010146 MOV R1,-(SP) PUSH R1 ON STACK 
1985 012136 010246 MOV Re, -(SP) ::PUSH Re ON STACK 
1986 012140 O10346 MOV 3, -(SP) -:PUSH R3 ON STACK 
1987 Olel42e O10546 MOV RS'-(SP PUSH RS ON STACK 
198€ 012144 012746 o20200 MOV #20200, -(SP) $3SEI BLANK SUITCH AND SIGN 
1989 012150 O16605 000020 MOV 20(SP);R5 3G THE INP NUMBER 
990 012154 100004 BPL 1$ ‘ioe IF 
1991 012156 OoS40s NEG RS + THE PRINABY NUMBER POS. 
1992 012160 112766 o000SS 000001 MOVB = #’-, 1 (SP) »:MAKE THE ASCII NUMBER NEG. 
1993 012166 005000 1$: CLR +f 3;ZERO THE CONSTANTS INDEX 
1994 012170 012703 012346 MOV #SDBLK,R3 “SETUP THE OUTPUT POINTER 
1995 012174 112723 900040 MOVB 8’, (R3)+ ::SET THE FIRST CHARACTER TO A BLANK 
1996 Ol2200 O0S500e2 2s: CLR R2 js CLEAR THE BCD NUMBER 
1997 Olecb2 O16001 012336 MOV $DTBL(RO),R1 | 3;GET THE CONSTA 7 
1998 012206 160105 33: SUB R1,RS ;;FORM THIS BCD DIGIT 
1999 O12210 oo2402 BLT ug 
2000 Oleele o0Se0e INC Re tT TINCREASE THE BCD DIGIT BY 1 
2001 012214 000774 BR 3$ 
2002 012216 060105 4g; ADD R1,RS ;;ADD BACK THE CONSTANT 
2003 012220 005702 TST Re ::CHECK IF BCD DIGIT=0 
2004 Oleee2e 001002 NE $ : FALL T 
2005 012224 105716 TSTB =: ( SP) : STILL DOING LEADING 0°S? 
2006 Ol2226 100407 BMI 75 :BR IF Y 
2007 012230 106316 cS: ASLB (SP) 3 ;MSD? 
2008 Ol2e32e 103003 Bcc 6 :BR IF NO 
2009 012234 116663 000001 177777 MOVE = 1(SP),-1(R3) 33 YES- -SET THE SIGN 
2010 Olee4¥2 OS2702 O00060 6S: BIS 8’0,Re ::MAKE THE BCD DIGIT ASCII 
2011 O12046 OS2702 o00040 7$: BIS #’ [Re sSMAKE IT A SPACE IF NOT ALREADY A DIGIT 
2012 O12252 110223 MOVB Re, (R3)+ THIS CHARACTER IN THE OUTPUT BUFFER 
2013 Oleesd 005720 TST (RO)+ tater INCREMENTING 
2014 OleeS6 O20027 op0010 CMP RO, #10 ::CHECK THE TABLE INDEX 
2015 Ole2be 002746 BLT 3340 bo THE NEXT DIGI 
shis pissed poseRs MOV J R2 GET Sue LSD 
2018 012270 000764 BR 330 CHANGE TO ASCII 
2019 Ole272 105726 gS: TSTB oF ;;WAS THE LSD THE FIRST NON-ZERO? 
2020 012274 100003 BPL 
2021 012276 116663 177777 177776 MOVB -1(SP),-2(R3) i IYES--SET THE SIGN FOR TYPING 
2022 012304 105013 9S: CLRB = (R33) SET THE TERMINATOR 
2023 012306 012605 MOV (SP)+,RS ::POP STACK INTO RS 
2024 012310 012603 MOV (SP)+'R3 *:POP STACK INTO R3 
2025 Olesi2 Ol2602 MOV (SP)+;Re :;POP STACK INTO Re 
2026 012314 012601 MOV (SP)+'Ri ::POP STACK INTO RI 
2027 012316 012600 MOV (SP)+’RO ::POP STACK INTO RO 
2026 012320 104401 o12e34e TYPE  ,$DBLK ::NOW TYPE THE NUMBER 
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OZOHNB.P11 CONVERT BINARY TO DECIMAL AND TYPE ROUTINE SEG C094 
2 4 V P),4(SP) ;;ADJUST THE STACK 
5h5d 815352 Oieete caste: Py ye MeV SRNL CER 
2031 012334 000002 RTI ;;RETURN TO USER 
2032 012336 d234e0 $OTBL: i0000. 
2033 01234 750 1 ." 
z 4 Q1e34 a4 : 
S 012344 le . 
2036 O12e346 000004 $DBLK: .BLKW 
one -SBTTL TYPE ROUTINE 
20393 LROUTINE 10 TYPE faci? MESSAGE MESSAGE MUST TERMINATE WITH A O BY 
SoM] Hee Ise lig RONSERTB NUMBER ran H RA ERS F RA A N 
-% 
su, NOTES: GRULL CONTAINS THE a hte _ ae I THE ite ke CHARACTER. 
2043 t ENOTE2: SFILLS CONTAINS THE NUMBER OF FILLER CHOBE. TERS REQUIRED. 
soe ; ENOTES: $FILLC CONTAINS THE CHARACTER TO FILL AFTE 
2046 * SCALL: 
2047 :*1) USING A TRAP INSTRUCTION 
cpus eR TYPE , MESADR ;;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 
2050 : YPE 
2051 ¥ MESADR 
e085 a 
2054 012356 105767 166575 $TYPE: TSTB $TPFLG ;;I1S THERE A TERMINAL? 
2055 012362 ApO00E BPL 1$ ;;BR IF YES 
2056 O12364 O000000 HALT ;;HALT HERE IF NO TERMINAL 
2057 012366 000430 BR 2 5s LEAW 
2058 012370 010046 1$: MOV 73S oD 
0s3 piss? 042500 000002 MOV AO tSpS is aeye AD *.% OF ASCIZ STRING 
060 Ole le2767 OO000l 166646 CMPB seta SENV ; ; RUNNING T 
2061 012404 001011 BNE 625 ;;NO,GO CHECK FOR APT CONSOLE 
2062 012408 132767 OO0100 168637 BITB #APTSPOOL , SENVM 339 SOL MESSAGE TO APT 
2063 012414 001405 BEQ 6e$ NO,GO CHECK FOR CONSOLE 
2064 O12416 010067 O00004 MOV RO,61$ ::SE ETUP MESSAGE at FOR APT 
gue Oi sise th 14 000220 JSR PC, SATY3 ;;SPOOL MESSAGE TO APT 
6 1e4e6 0000 61S: -WORD O Het ae ADDRESS 
2067 012430 132767 OOOO4O ifbbb1S Ee: ITB SAPTCSUP , SENVM 33 0P t COnnObe at oe 
Sa Bt 436 001003 NE 605 3; YES OUT 
12440 112046 es: MOVB (RO)+,-(SP) :: PUSH CHARACTER TO BE TYPED ONTO STACK 
2070 Ole44e 001005 BNE ‘2 :5BR IF IT ISN’T THE TERMINATOR 
2071 O12444 005726 TST (SP)+ ii F TERMINATOR POP IT OFF THE STACK 
2072 Ole446 012600 60$: MOV (SP)+,RO0 ;REST 
2073 O1e4S0 062716 oO0r0n2 3$: ADD #2, (SP) : : ADJUST RETURN PC 
2074 Bt 4S4 000002 RTI 53 
2075 O1e456 122716 O00011 4$: CMPB #HT, (SP) ;;BRANCH IF <HT> 
2076 Ole46e 001430 BEQ 
2077 O12464 122716 000200 CMPB #CRLF, (SP) ;;BRANCH IF NOT <CRLF> 
2078 012470 O01006 BNE 
20739 012472 005726 TST (SP )+ ;;POP_ <CR><LF> EQUIV 
2080 012474 104401 TYPE ;;TYPE A CR AND LF 
2081 012476 001227 $CRLF 
2082 012500 105067 000130 CLRB SCHARCNT 7; CLEAR CHARACTER COUNT 


3 012504 000755 BR es ;GET_NEXT CHARACTER 
c08+ Ole50& 004767 OOCOSe SS: JSR PC, STYPEC 60 TYPE THIS CHARACTER 


FOS 
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DZOHNB. Pil TYPE ROUTINE SEG 0095 
shee gisele doses fe BS: BRE? SGTLLC. (SPI+ is TP hd GO GET NEXT CHARS 
2087 012520 O16746 166430 MOV $NULL , -(SP) j3GET # OF FILLER -CHARS. NEEDED 
5090 Olsea0 fueseB Teer. OE a Ee oe stack 
2091 012532 004767 000032 JSR PC, STYPEC :G0 TYPE A NULL 
2092 012536 105367 000072 DECB  $CHARCNT ::D0 NOT COUNT AS A COUNT 
2033 012542 900770 BR 7$ : : LOOP 
e035 sHORIZONTAL TAB PROCESSOR 
2097 012544 112716 OO0040 8S: MOVB = #”._—, (SP) ;;REPLACE TAB WITH SPACE 
2098 O12e5S0 004767 000014 9g: JSR Pc, $TYPEC :: TYPE A SPACE 
2099 012554 132767 000007 oDD0S2 BITB #7) SCHARCNT ::BRANCH IF NOT AT 
2100 012562 0601372 BNE g tt 0 
2101 012564 005726 TST (SP)+ ::POP SPACE OFF STACK 
2102 012566 000724 BR 2s ::GET NEXT CHARACTER 
2103 g12570 108777 166354 STYPEC: STB OSTPS. ::WAIT UNTIL PRINTER IS READY 
2105 012576 116677 oo0002 166346 MOVB 2(SP), a$TPB ;;LOAD CHAR TO BE TYPED INTO DATA REG. 
2106 012604 iee7b6 000015 oo0002 CHP CR, 2(SP) i315 CHARACTER A CARRIAGE RETURN? 
2108 012614 105067 oo0014 CLRB § $CHARCNT +: YES--CLEAR CHARACTER COUNT 
2109 Ole620 o00406 BR STYPEX : EX 
2110 Olebee 122766 oo0d1e ocp0002 1S: CMPB ss RLF, o( SP) ::TS CHARACTER A LINE FEED? 
2111 O12630 001402 BEQ $TYPEX :: BRANCH IF YES 
2112 012632 105227 INCB (PC) + ::COUNT THE CHARACTER 
2113 012634 O00000 SCHARCNT:.WORD 0 CHARACTER COUNT STORAGE 
ety 012636 000207 STYPEX: RTS Pc 
e116 .SBTTL APT COMMUNICATIONS ROUTINE 
2118 © KKESKLA REA SEALE RHA KEKE R RAK AHLA LAA E KARAS ERA AAAA RA AHL S LALLA AHAEEE 
2119 012640 112767 00001 oo0236 $ATY1: MOVB  #1,$FFLG :;T0 RT FATAL ERROR 
2120 O12646 112767 000091 000226 SATY3: MOVB #1.$MFLG ::T0 TYPE A MESSAGE 
2121 012654 O00403 BR gatyc 
glee 01256 112767 000001 ocde20 saTy4: MOVE  #1,S$FFLG ;;TO ONLY REPORT FATAL ERROR 
2124 O1e664 oO10046 "MOV RO, -(SP) ;;PUSH RO ON STACK 
2125 Oleb66 010146 MOY R1’-(SP) !:PUSH R1_ON STACK 
elk Dice 76 105/67 000206 S18 SHFLG js SHOULD TYPE A MESSAGE? 
gee 012676 1ee7b7 000001 166346 CHPE #APTENV, SENV j S OPERATING UNDER APT? 
2130 012706 136767 000100 166337 B1TB BAPTSPOOL , SENVM j }SHOULD SPOOL MESSAGES? 
2132 012716 017600 oo0004 MOV 34(SP),RO ::GET MESSAGE ADDR. 
2133 Ole722 062766 000002 ocococ4 ADD #2, 4(SP) BUMP RETURN ADDR. 
e134 012730 005767 166276 1: Ist SHSGTYPE ;3SEE IF BONE W LAST XMISSION? 
2136 012736 010067 166304 MOY RO, SMSGAD :PUT ADDR IN MAILBOX 
2137 Ole74e 105720 2S: TSTB sé) + ::FIND END OF MESSAGE 
2138 012744 001376 BNE 2g 
2139 O12746 166700 166274 SUB §MSGAD , RO :;SUB START OF MESSAGE 
2146 Cle7S2 oose00 ASR RO ::GET MESSAGE LNGTH IN WORDS 


~ 
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DZDHNB. P11 APT COMMUNICATIONS ROUTINE 

4 V RQ, ;;PUT LENGTH I ILBOX 
$19) GIBES BIOOE? BBBBER eco = BY Le FHILLEROVoTHSRETRED 
2144 012770 017667 OO0004 o00016 38: MOV J4(SP) 4S ;;PUT MSG BOOB My rar LINKAGE 
2145 012776 O62766 000002 000004 ADD #2, 4(SP) ETURN ADDRE 
2146 O13004 O16746 164766 MOV 177776, -(SP) ;;PUSH 1 b5590 ON STACK 
2147 013010 004767 177342 JSR PC, STYPE *:CALL TYPE MACRO 
2148 013014 900000 4$: .WORD O 
2149 013016 cs: 
e150 013016 105767 o00062 10$: TSTB = SFFLG ;;SHOULD REPORT FATAL ERROR? 
2151 013022 O01416 BEQ 2g +s OT: BR 
2152 013024 005767 166222 TST SENV + RUNNING UNDER APT? 
2153 013030 601413 BEQ 12$ s : 
2154 013032 005767 166174 113: TST SMSGTYPE ; FINISHED LAST MESSAGE? 
2155 013036 001375 BNE F NOT: WAIT 
2156 013040 017667 OO0004 166166 MOV a4(SP), SFATAL wi ERROR 
2157 0130468 062766 o00002 o00004 ADD #2, 4(SP) UMP RETURN ADDR. 
2158 013054 005267 166152 INC SiG YPE :3T Lab 10 TAKE ERR 
2159 013060 105067 000020 12$: CLRB are LG i FER TAL FLAG 
2160 013064 105067 000013 CLRB = SLFLG ; CLEA OG FL 
2161 013070 105067 o00006 CLRB $MFLG >; CLEAR MESSAGE FLAG 
2162 013074 012601 MOV (SP)+,R1 ::POP STACK INTO Ril 
2163 013076 012600 MOV (5P)+'RO 33POP STACK INTO RO 
2164 013100 000207 RTS PC « RETURN 
2165 013102 000 S$MFLG: .BYTE 0 ::MESSG. FLAG 
2166 013103 000 $LFLG: .BYTE O >:LOG FLAG 
218? 013104 000 SFFLG: .BYTE O ::FATAL FLAG 
steg ere APTSIZE spn 
2170 000001 APTENV=001 
2171 000100 APTSPOOL=100 
2172 o00040 APTCSUP=040 
oita .SBTTL TTY INPUT ROUTINE 
5t5P ; |" gat (eee gan casement 
2177 
2178 SIE MIT ELTA Ok Le 
2179 SOFT WARE SWITCH REGISTER CHANGE R 
3180 bEROUT ENE IS E ENT RED FROM THE TRAP GANOLER AND WILL 

181 ?*SERVICE THE - T FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL 
te 13106 0227 Z 000176 166924 jaeN — aNREG. a” _ T-SWR SELECTED? 

3 4 ; 

184 613198 nate BNE 12g P i Ranta IF ho 
2185 013116 sti 166022 TSTB asks CH HAR THERE ? 
sley Giaiee [Ure see rove Hetrg,-cse) dove Cana o” AOU 
st g Bt i§¢ mesa {S5p48 BIC ie, (SP)  aave ty F THE ASCII 
2183 013134 22726 000007 CHP 7 cherta 3318 IT TA CONTROL _¢? G? 
2191 ot31 39 eae 165766 900001 BNE $33 708, #1 ii ARe fe RUNNING Th N R euTo-MoDE? 
eld 013150 OO14S6 BEOQ 15$ »:BRANCH IF Y 

194 9131 104401 01376 TYP CNTLG ;sECH ONTROL-G (1G) 
518 613 12e 1 qap4 1358 SGTSWR: TYP $s MSW WR YP CHE REY CONTENTS 
219% O13162 O1E74E E5010 MOV SWREG, -(SP) ::SAVE SWREG FOR TYPEOUT 


MAINDEC-11-DZDHN-B 
OZOHNB.P11 


5146 
2199 


B13t%8 


013366 


1BaN8T 
O0SO46 


100375 


117746 
042716 


021627 


000720 
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013777 


165740 


165734 
177600 


o000eS 


013754 
000006 


000015 
oo0004 
o0o00e 


165641 
000100 


177254 
000060 


000067 


009050 
000002 


o0000e 
177776 


001226 


165660 


000001 
165636 
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19$: CLR 
7$: TSTB 


93: CMP 


20$: ADD 
BR 


108: CMP 


173: INC 


18$: TYPE 
BR 
-DSABL LSB 


, SMNEW 
-(SP) 


-(5P) 
aSTKS 
7§ 


aSTKB,-(SP) 
##C177, (SP) 


(SP), #25 
10$ 
$CNTLU 
ke SP 
19$ 
(SP), #15 
16$ 
4(SP) 
11$ 
2(SP), aSWR 
SCRLF 
SINTAG, #1 
#100, ISTKS 


PC, STYPEC 
(SP), #60 
185 


(SP), #67 


#60, (SP)+ 
2(SP) 
173 


NEW SW 
;;CLEAR COUNTER 
;; THE NEW SWR 
;;CHAR THERE? 
;;IF NOT TRY AGAIN 


;;PICK UP CHAR 
;;MAKE IT 7-BIT ASCII 


t BRomp BOR hen Gat ICAL DIGITS) 


IS IT A CONTROL-U? 
::BRANCH IF NOT 

YES, ECHO CONTROL-U (tU) 
: IGNORE PREVIOUS INPUT 
:LET’S TRY IT AGAIN 


;;IS IT A <CR>? 
;;BRANCH IF_NO 

-:YES, IS IT THE FIRST CHAR? 
:: BRANCH IF YES 

::SAVE NEW SWR 


; TACK 
;;ECHO <CR> AND <LF> 
::RE-ENABLE TTY KBD INTERRUPTS? 


338 IF 
: RE-ENABLE TTY KBD INTERRUPTS 


ee < 0? 
;;BRANCH IF YES 
°C 7? 


;;BRANCH IF YES 
;;STRIP-OFF ASCII 

;;15 THIS THE FIRST CHAR 
;;BRANCH IF YES 

;3;NO, SHIFT PRESENT 

3; CHAR OVER TO MAKE 
;; _-ROOM FOR NEW ONE. 
;; KEEP 


COUNT OF CHAR 
;;SET IN NEW CHAR 
;;GET THE NEXT ONE 
3; TYPE ?<CR><LF> 
;;SIMULATE CONTROL-U 


ss REKRERKKE KERALA LAE RL A RAK AA LALA KALA AAA AERA RAL AARE ALAA EAE SAAAE 


" RDCHR 
tk RETURN HERE 


; ; CHARACTE 


:¥THIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 


;;INPUT A SINGLE CHARACTER FROM THE TTY 
R_IS ON THE STACK 
;;WITH PARITY BIT STRIPPED OFF 


SEG 0097 


Sie | nate 


OZOHNB.P 


2397 
2208 


013506 


12624 
13630 


is 


010346 
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000004 
165540 


17760 
000004 
165506 
165502 


000004 
ooc004 
000040 


013744 
013754 


000177 


p01 33 34 
177779 
013744 


000144 
013742 


arara2 


000025 


o0000e 


00004 


000023 


000140 


000175 


000004 


009170 


090124 


108 
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$SROCHR: iy (SB24- se + ebve ree THE PC 
1$: TSTB = aSTKS' 1 AIT 
BPL 1$ aT. CHARACTER 
MOVB  a$TKB,4(SP) ;;READ THE TTY 
BIC #tC<177>,4(SP) :GET RID OF JUNK IF ANY 
CHP 4(SP), #23 ete IT A CONTROL-S? 
2s: PAE TKS : WAIT NOR A NR UARACTER 
BOVE aSTKB, -(SP) ::L00e UNTIL Tis spect: 
BIC wtC17? P) : + MAKE 9 7-BIT ASCII 
CMP SP)+, bai 31S IT A CONTROL-Q? P 
BNE es $31 NOT DISCARD IT 
33: CHP asp», a140 iletr, UPPER CASE? 
CHP 4(SP), #175 r1S TT A SPECIAL CHAR? 
BIC #40, 4(SP) RAKE IT UPPER CASE 
RTI 0 BACK TO 


USER 
Ear Tee Tame TC-TrMe-TETTTSa LCL art lillie 


SRDLIN: 


1$: 
2s: 


10$: 


6$: 


S$: 


7$: 


ROLIN 
RETURN HERE 


R3,-(SP) 
-(SP) 
#STTYIN,R3 


BSTTYINGS. »R3 
4$ 


(SP)+, (R3) 
#177, (R3) 


(SP) 
#°\, 9S 

$ 
b-1, (SP) 
R3, #STTYIN 
4§ 


or-ul 
0 HWW 


jATHIS ROUTINE WILL INPUT A STRING FROM THE T 


;; INPUT A STRING FROM THE T 
::ADDRESS OF FIRST CHARACTER YWILL BE ON THE STACK 
>: TERMINATOR WILL BE A BYTE OF ALL O'S 
339 ei: RY 
i5CLE R HE RUBOUT KEY 

GET ADDRESS 
HBP eee 

EAD ONE CHARACTER FROM THE T 

GET CHARACTER 

-IS IT Q RUBOUT 
BR THIS THE FIRST RUBOUT? 
:: TYPE A BACK SLASH 
:;SET THE RUBOUT KEY 
; BACK UP BY ONE 
STACK EMPTY? 
ti SETUP TO TYPEOUT THE DELETED CHAR. 
$166 READ ANOTHER CHAR. 
3 ;RUBOUT KEY SET? 

F NO 

tt TYPE A BACK SLASH 


aces THE RUBOUT KEY 
tide FUARACTER A CTRL U? 


SEG 0098 


JO8 
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zi 
2 


ee: 


013777 
014004 


014010 
014012 


014042 


ee 
0 


013754 
o000ee 
gee 
001226 
OOO046 


Bbi6i 

00286 
ocoo04 
013744 
005015 


0 
047040 
000040 


000004 


000100 


000002 
000004 


000 
000012 
Oe0l2e 


053505 


900002 


8$: MPB 


BR 
4$: BYPe 


3$: MOVB 


9$: .BYTE 
BITyiN: 


" 'ASCIZ 


S$MNEW: .ASCIZ 


‘ge 

#22, (R3) 

3$ 

(R3) 

SSCRLF 
strvin 
QUES 

i 

(R3), 9S 

bi5, (R3)+ 

2 


0 

0 

8. 
7tU/¢15><12> 
/tG/<15)><12> 


(15><12>/SWR = 


/ NEW = 


igs 1ER one Se | 
Bi: HRRACTER A "tR"? 
$ BRANCH 


HEUER TH CHORACTER 


tETYPE THE INPUT STRING 
;}G0 PICKUP ANOTHER CHACTER 


TY 
tECLEAR THE BUFFER AND LOOP 
:sECHO THE CHARACTER 


ss CHECK FOR RETURN 
+ CLEBR RETURN (THE 15) 
tS SUBPR RE — FEED 


CL LEAN PRUBOUT KEY FROM THE STACK 


i ABIUST The STACK AND PUT ADDRESS OF THE 
FIRST ASCII CHARACTER ON IT 


STORAGE FOR ASCII CHAR. TO TYPE . 
;; TERMINATOR 
;;RESERVE 8 BYTES FOR TTY INPUT 
eh ROL “U" 

:CONTROL "G" 


.-SBTTL READ AN OCTAL NUMBER FROM THE TTY 


BR bah dalek ba teh ka tet labet tabled ttt tebe bbadash Sl 
i ac See READ AN OCTAL (ASCII) NUMBER FROM THE TTY AND 


HARACTERS WILL BE CHECKED TO INSURED THEY ARE L om 

N ILLEGAL CHARACTER IS READ A ”?" WILL BE TYPED 
ARR AGE RETURN-LINE FEED. THE COMPLETE NUMBER MUST 
REN BE RETYPED. THE INPUT IS TERMINATED BY TYPING A CARRIAGE RETURN. 


oe th 
, eocTal Yer fs. 


BY A 


$RDOCT: MOV 


1$: ROLIN 


es: MOVB 


RDOCT 
te RETURN HERE 


Re 
(RO)+,-(SP) 


;;READ AN OCTAL NUMBER 
::LOW ORDER BITS ARE ON TOP OF THE STACK 
:tHIGH ORDER BITS ARE IN SHIOCT 


3 }PROVIDE SPACE FOR THE 
PUT NUMBER 


BUSH RO ON STACK 
;;PUSH RI ON STACK 
SH Re ON STACK 
3 5READ AN ASCIZ LINE 
ADDRESS OF 1ST CHARACTER 


;GE 
AN D SAVE IT 
;;CLEAR DATA WORD 


;;PICKUP THIS CHARACTER 


SEG 3099 


ra 


‘ 
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OZOHNS.P11 READ AN OCTAL NUMBER FROM THE TTY SEG 2100 
14044 00142 EQ 3$ ;;IF ZERO GET 0 
aie oi 4g reeset 000060 ‘IPB «#0, (SP) tt axe SURE THis. CHARACTER 
OS2 003026 BGT 4g :1S AN OCTAL DIGIT 

53, piuoed 122716 000067 CMPB —s#'’7, (SP) 
2369 O14060 O02423 BLT 4 
2370 O14062e 006301 ASL R1 +3 #2 
2371 O14064 006102 ROL Re 
2372 O14066 006301 ASL RI 5344 
2373 014070 006102 ROL Re 
2374 014072 006301 ASL RI +3 #8 
2375 O14O74 006102 ROL Re 
2376 014076 O42716 177770 BIC atc? , (SP) grate THE ASCII JUNK 
2377 O14102 O62601 ADD (SP)+,R1 ADD IN THIS DIGIT 
2378 O14104 000756 BR 2$ 
2379 014106 005726 33: TST (SP)+ +iL008 TERMINATOR FROM STACK 
2380 O14110 O10166 oo001e MOV R1, 12(SP) ::SAVE THE RESULT 
2381 O14114 010267 o000e6 MOV Re: SHIOCT 
2382 014120 Ole602 MOV (SP)+,Re ;;POP STACK INTO Re 
2383 O14lee o1 $01 MOV (SP)+'R1 *:POP STACK INTO RI 

3 14124 612600 MOV (SP)+’RO POF STACK INTO RO 
2385 014126 o00902 RTI N 
2386 014130 005726 4g: TST (SP)+ : CLEAN PART IAL FROM STACK 
2387 014132 105010 CLRB = (RO) i tcET A TERMINATOR 
2388 014134 104401 TYPE : TYPE UP THRU THE BAD CHAR. 
2389 014136 O00000 cS: .WORD O 
2390 O14140 104401 001226 TYPE SQUES ie "7" § “LF 
2391 014144 000730 BR {gs :TRY AGAIN 
2292 614146 o00000 SHIOCT: .WORD 0 * HIGH ORDER BITS GO HERE 
e333 .SBTTL READ A DECIMAL NUMBER rb THE T 
2395 . jar MICITTE ILL ERO A CECIION CRECIT) MMPEEER FROM THE TTY GN 
2396 THIS ROUTINE WILL READ A DECIMAL (ASCII) NUMBER FROM THE TTY AND 
2397 ; #CHANGE IT TO BINARY. IF TOO MANY CHARACTERS OR ANY ILLEGAL CHARACTERS 
2398 *¥ARE READ A?" FOLLOWED BY A CARRIAGE RETURN-LINE FEED WILL BE TYPED. 
2399 ;*TH HE COMPLETE NUMBER MUST BE RETYPED. THE INPUT IS TERMINATED BY THE 
2400 '¥USER TYPING A CARRIAGE RETURN. THE RANGE OF THE INPUT NUMBER IS 
2401 POSITIVE 32767 TO NEGATIVE 32768. 
2402 :*CALL: 
2403 :% RODEC ;;READ A DECIMAL NUMBER 
att :% RETURN HERE ::NUMBER IS ON TOP OF THE STACK 
2406 F 
2407 O141iSO O11646 SRODEC: MOV (SP), -(SP) ; PROVIDE SPACE FOR 
2408 O1MIbe O16656 00004 o00002 MOV 4(SP}_2(SP) +: THE INPUT NUMBER 
2409 O14160 010046 MOV RO, -(SP) ; ;PUSH RO ON STACK 
2410 O14162 010146 MOV R1,-(SP) *PUSH R1 ON STACK 
2411 O14164 010246 MOV Re, -(SP) PUSH Re ON STACK 
e4ie O14166 104411 1$: ROLIN READ AN ASCIZ LI 
2413 014170 012600 MOV (SP)+,RO i ADDRESS OF 1ST CHA 
e414 014172 010067 000120 MOV RO,6$ SAV E INCASE | OF BAD INPUT 
e415 014176 OOSO4G CLR -(§P) Pitre WORD 
e416 014200 o05002 CLR 2 : + SIGN ser POSITIVE 

2417 Ol4202 122710 ooooss CMPB st’ -, (RO) -:SEE IF A MINUS SIGN WAS TYPED 
2418 014206 OO1001 BNE 2g ::BR IF_NO MINUS SIGN 

2419 O14210 112002 MOVB  (RO)+,R2 SAVE FOR LAT 

2426 Ol4el2e 11200] 2s: MOVB  (RO)+.RI ::PICKUP THIS CHARACTER 


MAINDEC- “| teeene™ 


OZDHNB.P 


sles Btbte 
e4e3 Ol422e 


014306 


014310 
014312 


014324 


014326 


014346 


ss Shae 
014360 


MACY11 27(732) 
READ A DECIMAL NUMBER FROM THE TTY 


08 
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OT_IF_ZERO 
793367 oooo6o ae ¥o,R1 ti fice Uae’ rAte CHARACTER 
003032 BGT S$ +315 5 DIGIT BETWEEN 0 & 9 
122701 000071 CHPB #9, Rl 
b38776 170000 It 817777, (SP) | ;;DON’T LET NUMBER GET TO BIG 
001024 BNE 54 ;BR IF NUMBER WOULD OVERFLOW 
006316 ASL (SP) 
011646 MOV (SP) ,-(SP) Save FOR LATER 
006316 ASL (SP) 1% 
006316 ASL (SP) 36. 
062616 ADD (SP)+, (SP) *10. 
102416 BVS 5g ‘OVERFLOW ISN’T ALLOWED 
162701 OO0060 SUB #70, R1 jsSTRIP AWAY THE ASCII JUNK 
060116 ADD R1, (SP) ;;ADD_IN THIS DIGIT 
102412 BVS 5§ ;JOVERFLOW ISN’T ALLOWED 
000752 BR 2g LOOP 
005702 33: TST Re CHEK IF NUMBER IS NEG 
01401 BEQ 4g R IF NO 
OS4i6 NEG (SP) :iYES--NEGATE THE NUMBER 
012666 000012 4S: MOV (SP)+,12(SP)  ; SAVE THE RESULT 
12608 MOV (SP +, Re ::POP STACK INTO Re 
12601 MOV (5P)+'RI ::POP STACK INTO RI 
012600 MOV (SP)+'RO ::POP STACK INTO RO 
oo0002 RTI +: RETURN 
005726 Ss: TST (SP)+ ;;QLEAN PARTIAL NUMBER FROM STACK 
105010 CLRB = (RO) :iSET A TERMINATOR 
104401 TYPE :: TYPE THE INPUT UP TO BAD CHAR. 
000000 6S: .WORD 0  }POINTER GOES HERE 
104401 001226 TYPE SQUES =a" B°LF* 
000720 BR 1$ tory AGAIN 
.SBTTL TRAP DECODER 
Seta DEAITTME HL) PIRAD TE Ltn BYTE GF Taek “TER” THAT MTT 
jATHTS ROUTINE WILL PICKUP THE LOWER BYTE OF THE “TRAP™ INSTRUCTION 
AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
SOF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 
:*GO TO THAT ROUTINE. 
010046 STRAP: MOV RO, -(SP) 
016600 ooo0ce2 MOV ee), RO Ham: Teme AgoRESS 
005740 TST 
111000 MOVB (ROD. RO i3GBT RIGHT BYTE OF TRAP 
006300 ASL RO ;sPOSITION FOR INDEXING 
016000 014362 MOV STRPAD(RO),RO ;INDEX TO TABLE 
000200 RTS RO ::G0 TO ROUTINE 
;;THIS IS USE TO HANDLE THE "GETPRI” MACRO 
O1164 STRAP2: MOV (SP) ,-(SP) ;;MOVE THE PC DOWN 
Oi6666 oo0004 oDDn02 MOV 4(SP),2(SP) MOVE THE PSW DOWN 
ogoca2 RT :;RESTORE THE PSW 


-SBTTL TRAP TABLE 


SEG 0101 
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Pil TRAP TABLE SEG O102 

Sime THIS TA ONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 

4 :*TH NTAIN LL 

a : ¥BY PHE AGE 69 TRetRucT Ton. 

481 ; ROUTINE 

exe c. . ¢  Poaenep 

2483 014362 014350 $TRPAD: .WORD $TRAP2 

eue4 14364 012356 TY : <CALL=TYPE TRAP+1(104401) TTY TYPEOUT ROUTINE 

4 14366 117 STYPOC j}CALL=TYPOC © TRAP+2(104402) TYPE OCTAL NUMBER (WITH LEADING ZERCS) 
2486 014370 011704 STYPOS ::CALL=TYPOS | TRAP+3(104403) TYPE OCTAL NUMBER (NO LEADING ZEROS) 
2487 014372 011744 STYPON  }CACL=TYPON TRAP+4(104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 
at 014374 012132 STYPDS ::CALL=TYPDS | TRAP+S(10440S) TYPE DECIMAL NUMBER (WITH SIGN) 
e430 014376 013156 SGTSWR ;;CALL=GTSWR § TRAP+6(104406) GET SOFT-SWR SETTING 
2492 O14400 013106 SCKSWR ;;CALL=CKSWR | TRAP+7(104407) TEST FOR CHANGE IN SOFT-SWR 
2493 014402 013370 SROCHR ;;CA'L=RDCHR § TRAP+10(104410) TTY TYPEIN CHARACTER ROUTINE 
2494 O14404 013510 SROLIN i §CR..-=ROLIN TRAP+11(104411) TTY TYPEIN STRING ROUTINE 

2495 O14406 O14010 SRDOCT 33¢R LL=RDOCT TRAP+12(104412) READ AN OCTAL NUMBER FROM TTY 
2496 O14410 014150 SRODE CALL =RO TRAP+13( 104413) READ A DECIMAL NUMBER FROM TTY 
Ea .SBTTL POWER “Hotih A fp SuTINES 
24939 + EKA GH KKK HSE LKR LE KALLE LLL LEAL EAL E LEK LEEK ALEK LEE ELE 

2500 jPOWER DOWN ROUTINE 
5501 O14412 012737 014556 oODDe4 $PWRDN: MOV WSILLUP, QUPHRVEC ; ;SET FOR FAST UP 
2502 O14420 012737 000340 op0026 ” MOV #340 QEPURVEC+E PIO 

2503 014426 010046 MOV 0,-(SP PuSH 0 ON STACK 
2504 014430 010146 MOV At <p) PUSH RI ON STACK 
2505 014432 010246 MOV Re, -(5P) i pysH Ri ON STACK 
2506 O14434 010346 MOV R3, -(SP) PUSH R3 ON STACK 

2507 O14436 010446 MOV RY, -(SP) PUSH RY ON STACK 
2508 O14440 010546 MOV RS: -(SP) j PUSH RS ON STACK 
2509 O14442 017746 164472 MOV aSHR 5(SP) 5 3PU USH JSWR ON STACK 
2510 O14446 010667 000110 MOV AVR6 : SAV 
2511 O144S2 012737 O14464 oDg0e4 MOV ISPRRUP. JSPWRVEC’:;SET UP VECTOR 
2512 O14460 O0d000 HALT 
e513 014462 000776 BR 2 ;;HANG UP 

2515 © SHAK KARA LEAR REAR A AERA RAL A ARRAS RA RAAL ALLA REALE ARAL AAL AHL AAEEE 
2516 BOWER UP ROUTINE 
3517 O14464 012737 O14SS6 ocOOD2y $PWRUP: MOV HSILLUP, QWPWRVEC ; ;SET FOR FAST DOWN 
2518 O14472 016706 OOO0064 MOV SSAVRG, SP T 
ge13 O17 005067 000060 CLR SSAVRE: tUATT LOOP FOR THE TTY 

S 14502 005267 000054 1S: INC SSAVRE };WAIT FOR THE INC 
2521 O14S06 001375 BNE 1$ WORD 

2522 O14510 012677 164424 MOV (SP)+, ISWR : POP STACK INTO aSWR 

2523 014514 012605 MOV (SP)+;R5 :POP STACK INTO RS 

2504 014516 012604 MOV (SP)+; tt pop STACK INTO RY 

2525 014520 012603 MOV (SP)+'R3 *:POP STACK INTO R3 

2526 014522 012602 MOV (SP)+)Re ::POP STACK INTO Re 

2527 014524 012601 MOV (SP)4, *:POP STACK INTO RI 

2528 014526 012600 MOV (SP)+:RO ::POP STACK INTO RO 

2529 014530 012737 oO14412 oD00e4 MOV 8SPWRON, JHPWRVEC’ joer UP THE POWER DOWN VECTOR 

2530 014536 010737 000340 O000c6 MOV #340, J#PWRVEC+2 ; : PRI 

2531 O14544 104401 TYPE the a THE POWER FAILURE 


eS3e O14S46 014564 SPURMG: .WORD  SPOWER ;;POWER FAIL MESSAGE POINTER 


NOS 
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2533 O14SS0 012716 MOV (PC) (SP) ;;RESTART AT CKRSTL 
5% b1yee5 Bb9 74 SPWRAD: .WORD CKRSTI > :RESTART ADDRES 

ie 8 SILLUP: HALT ;;THE POWER UP SEQUENCE WAS STARTED 
2537 014560 pago8 i .-2 +5 BBEFOR THE POWER DOWN WAS COMPLETE 
Seq BtY a BRee 047520 042527 SPGKER: “ASCIZ <15><12>"POWER™ ’’ 
2540 014572 O00122 


254] LEVEN 


SEQ 0103 
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Pll 


014574 


014650 


014654 
014660 
014664 


014750 


014752 
014756 
014760 
014764 


005767 


012711 
004767 
012711 


156711 
7 


000207 


05767 


012767 
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OOSS46 
o0ssse 
165626 
171266 
170062 
005516 
o0SSee 
165566 


171236 
170032 


004000 
OO4SS6 
030100 


005256 


032776 


005175 


005167 
000001 


013604 
004676 


000004 
000010 
000006 


oo4s4e 


BO9 
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s RHEAKE AHHH ALAA LAKE AEA AL KAA AKA A KLARA AAA LALA KRE AE LE RL EAL ERL ALLE 


Connon DH11 SERVICE ROUTINES 


5 RRRRR REALE REEL GREER ELE EAA EL EERE L LEER REL EEEE ALLER ERLE LE EE 


ese ROUTINES DETERMINE RESTART ADDRESS ‘sh SYSTEM ERROR 
;(BUS ERROR,RSVD INSTR ERROR, OR POWER FAIL) 


CKRST1: TST DPFLG 

BNE 

TST RETFLG 

BNE es 

JMP RSTRTA 
1$: JMP EXPAT 
es: JMP ECHO 
CKRSTe: TST DPFLG 

BNE 1$ 

TST RETFLG 

BNE es 

JMP REST1 
1$: JMP EXPAT 
2s: JMP ECHO 


sIN ee TEST ? 
IN ECHO TEST ? 

: BR YES 

GO RESTART Ret, 1081 
:GO TO PATTERNS TES 
:GO TO ECHO TESTS 
sIN oe TEST ? 
iat EHD TEST ? 

GO RESTART Pe ISBT TESTS 


:GO TO PATTERNS T 
GO TO ECHO TESTS 


LITY TESTS 
TS 


;THIS ROUTINE IS CALLED TO SET UP THE DH11 PARAMETERS PRIOR TO TEST 


DHSET1: MOV #BIT11, (RL) 
JSR PC. CHPS2 
MOV #30100, (R1) 
BISB LINE, (R1) 
CLR RDO 
MOV #RBUF , REFPTR 
MOV #RBUF | RBFE 
MOV CHRCNT, RS 
NEG RS 
ADD RS, RB 
MOV CURLPR, LPR(R1) 
MOV CHRCNTBCR(R1) 
MOV #TBUF , CAR(RL) 
RTS Pc 


;CLEAR THE DH11 UNDER TEST 
G0 LOCK OUT INTRS 
j ENABLE INTERRUPTS ON XMIT DONE 

-EX MEM, DA 1 saa OR SILO OVFLW 


;MA 

;GET CHAR COUN 
;MAKE IT POSITIVE 
;LORD My LPR REG 


;LOAD THE BYTE COUNT REG 
iba CURRENT ADDRESS REG 


THESE ESPSEB.TBGR MED LE NO. SED OW TH 


;CALLING SEQUENCE: 


; JSR PC, SELINE 
:BR 1$ 


SELINE: TSTB LINE+1 
BNE $ 


COMB LINE+1 
MOV #1,LINMSK 


;CALL THE ROUTIN 

sEXI ope INE MOVES THE RETURN 
PC AROUND THIS BR IF MORE LINES ARE 
;YET TO BE TESTED 


sPIRST NOT THROUGH FOR ANY TEST ? 


SET ENTRY FLAG 
; INIT SELECT Test MASK TO TEST LINE 00 


“ye 
SEG 0104 > 
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2538 ae Aps082 0051S CLRB. LINE ;START WITH LINE. #00 


1477) ‘GO TEST FOR LINE #00 
105267 005146 1$: INCB = LINE GENERATE NEW LINE NO. 
aa 515004 Boe 367 o04se4 ASL LINMSK “SHIFT SELECT MASK TO TEST NXT _LINE 
she = 1 bo 7 BEG 3$ Re Tua 6 EXIT BRANCH - ALL LIN S DONE 
1501 767 OO4S16 OO4S12 2S: LINMSK, LINSEL S THE nine SELECTED FOR TEST ? 
cPo¢ pt egse esos oogoo2 aa #2, (SP) i MOVE RETURN PC AROUND EXIT BRANCH 
606 pt epse nated ‘009 BR ig RETURN, 10 NEF SEEN DL INE 
Seog 12034 142777 DoodI? OOwGO 48:  B1¢8 817 -2DHAOR NIT CINE SELECT m0 LINE Meg! a 
oc08 pteba3 Aa5oq5 saz ‘ Bie Hy ’ AME TO CALLING TEST 
e611 THIS ROUTINE I§ cALLeD TO CONVERT EITHER THE OH" NUMBER 0 OR THE 
eb S PART TCULAR R OER Soace Bue Pea FOR ER of REPO TING 
e616 ;CALLING SEQUENCE 
2617 ;JSR_—_- RS, SUNUM sCALL TO THIS, RO INE 
2618 :ADDR1 ‘ADDRESS OF THE NUMBER TO BE CONVERTED 
ob 13  ADDRe ?ADDRESS OF THE MSG BUFFER SLO 
oP5> OIe044 D004 eS ee” ; ;PUSH RO ON STACK 
spss ptabde pte MOV R1’-(SP) +5 PU Het R it et ack 
2624 O15050 O102046 MOV Re. -(SP) :>PUSH Re ON STACK 
2625 015052 O12500 MOV (RS)+,RO Pu ADDRESS OF NUMBER 
2626 015054 O12501 MOV (RS)+°R1 :GET MSG BUFFER Al 
2627 O15056 111000 MOVB (RO), RO :GET NO. TO BE CONVERTED 
2628 015060 010002 MOV RO, Re ‘SAVE IT IN 
2629 O15062 0062 ASR Re ‘SHIFT MSD TO LSD POSITION 
2630 015064 O06e ASR R 
2631 O15066 O0620e ASR Re 
2632 015070 O42702 177770 BIC #177770,R2 CLR JUNK BITS 
2633 015074 O62702 OO0D060 ADD #60,Re j NAKE IT A 
2634 015100 110221 MOVE Re, (RI)+ T IT IN see BUFFER 
2635 015102 042700 177770 BIC #177770, RO CLR JUNK af On LSD 
cpse Btetse rare samme: Rove HT MAKE IT 0 IN THE BUFFER 
5P3g Bett bi DEA Sy Roe) a Re POP Pack Te ue 
2639 015116 012601 MOV (SP)+;R1 ;;POP STACK INTO Ri 
2640 015120 O12600 MOV (5P)+, RO : POP STACK INTO RO 
goal 015122 o00e0s RTS #3 URN TO CALLER 
2643 ;THIS ROUTINE IS CALLED TO SET UP THE ERROR INFORMATION IN THE 
gbu4 :MESSAGE BUFFERS 
2646 015124 010067 164932 SUER2: MOV RO, SREGO ;STORE THE REGS IN CORE 
2647 O15130 010167 164030 SUERI: MOV R1; $REG1 
2648 015134 010267 164026 MOV R2;SREG2 
2649 O15140 010367 164024 MOV R3, SREGS 
2650 015144 010467 164022 MOV R4; SREGH 
ebb] 015iso 000207 RTS PC ;RETURN TO REPORT ERROR 


2653 ;THIS ROUTINE AUTOSIZES THE SYSTEM TO DETERMINE THE ADDRESSES AND 
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-Pll 


0151Se 


015216 
01S22e 


015224 
015230 


015250 
015252 
015256 


0 
015344 
O1S346 


010046 


012702 
012701 
005711 
005761 
052711 
052711 
052711 
032711 
001410 
052711 
032711 
001003 


042711 
0101ee2 


020127 
000746 


012716 
00900e 


012737 


012716 
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; VECTORS OF THE DH11’S AND DM11-BB'S. 


021756 


000102 
oo0004 


021756 
160020 
000016 
004000 


001000 
002000 
003000 


000400 


002400 


001000 


163780 


000020 


015272 


015346 
170500 


170670 
000010 


C1533e 


000004 


000004 
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AUTOSZ: MOV 
CLR 


ess: 


"16: ‘TST 


4§: MOV 
RT! 


RO, -(SP) 
R3 
#DHADRS , Re 
(R2)+ 

R3, #102 


ase’ — 


SORADRS, Ra 
#DHADRS, R2 


#160020,R1 
(R1) 
16(R1) 
#4000, (R1) 
#1000, (R1) 
#2000; (R1) 
#3000) (R1) 
3$ 

#400, (RL) 
#2400, (RL) 


3$ 
#1009 (R1) 
(Re)+ 


R1, #163760 
#20,R1 
1$ 


#3$, (SP) 


; TEST FOR OM11 BB ADDRESS 


S$: MOV 
MOV 
21s: TST 
MOV 
235: CMP 
BEG 
ADD 
BR 
6$: MOV 


#6$,a84 
#170500,R1 
(R1) 
R1,(R3)+ 
R1, #170670 
22$ 

#10,R1 

21$ 


#233, (SP) 


;CLEAR DH TABLES. 


i BRANCH IFN a ALL ENTRIES? 

SAVE TRAP VECTOR. 

;SETUP FOR HONE SISTENT MEMORY TRAP. 
:SETUP DM ADDRESS TABLE POINTER. 

;SET UP DH ADDRESS TABLE POINTER. 


;R1=FIRST ADDRESS TO BE TESTED. 


;SEE IF ADDRESS IN R1 RESPONDS. 
i CHECK 19 SEE IF DEVICE IS MODULO 20. 
:AND CHECK T 

; IF THIS ADDRESS CONTAINS 


DH-11. 

'CHECK TO INSURE THESE BITS SET. 

TF NOT, BRANCH. 

:SET THE MAINTEN ANCE BIT, rite NON- 

SEXISTENT MEMORY BIT AND’ THE CLEAR 

NON-EXISTENT MEMORY INTERRUPT BIT. 
‘TS THIS A DH-11? (BITS 8 AND 10 SHOULD 

‘CLEAR IF THIS IS A DHI1. 


;IF NOT, CHECK TO SEE IF THIS IS A DM11-BB. 
?CLEAR MAINTENANCE 
SAVE THE ADDRESS IN THE DH ADR TABLE. 


;HAVE WE ery. THE TOP OF THE FLOATING ADDRESSES. 


‘IF YES, GET 
IF NOT, UPDATE ADDRESS AND 
:GO CHECK 


;IF DH ADDRESS DOES NOT RESPOND, GO TO 3S. 
; SETUP FOR NON-EXISTENT TESTED. TRAP. 


:50 ADDRESS. 
ave ie REACHED THE TOP OF —e DM11 ADDRESSES? 
‘IF NOT, UPDATE ADDRESS AND 

:GO CHECK IT. 


;IF DM ADDRESS DOES NOT RESPOND, GO TO 238. 


SEG 0106 


ih | ieee” 
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DZDHNB. P 


015352 


015354 
015360 
015364 
015366 
015372 


15374 


0154Se2 
0154S4 
015460 
015462 
C1S466 


1$47 
1547 


015474 
015500 
015506 
015514 
Hes 


oles 


ize ef 
iss4e 


O1SS44 
blgess 
01SSS4 


O1SSSE 
01SS6e 


ooo0de 
012637 


010423 
012724 
022324 
020427 
101771 


iH 


OOS0E7 
052772 
05277e 


005000 


gusset 
Bibiss 
022626 
012716 
052772 
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000004 
021756 


025733 


004S26 


021756 
4 


000022 
000020 


000302 


000004 
001000 


162276 
001000 00 
000300 000 


oo 
oOo 
Ooo 


025762 
004000 
001000 


000000 
000000 


000007 


015470 
004000 000000 


EQ9 
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2e$: 


7$: 
8$: 


9$: 


10$: 


118: 


123: 


(SP)+, 084 
SDHADRS, R2 


,MSG1 


8 
RO, SOHSEL 


“BOHADRS, 8 Re 
#340, ee ETOTVEC#e ‘SET 


#12$, aH IOTVEC 


$302" RY 

RY, (R3)+ 

#4, (R4)+ 

(R3)+ (R4)+ 
4 #1000 


9$ 
(R2) 

155 

io 0,a(R2) 
#450. a(Re) 
RO 

11$ 

,M5G2 


#4000, a(Re) 
#1000, ,@(Re) 


810$, (SP) 
#4000, 3(R2) 


;RESTORE TRAP VECTOR. 
;HAV E ye ae ANY DH11’S AT ALL? 


B 

NO Mote S WERE FOUND, 

;R2 NOW CONTAINS THE NUMBER 

OF DH’S FOUN ND 

‘FILL RO WITH 1’S 

; CORRE SE NDING TO 

THE NUMBER OF DH’S 

: FOUND. 


CONTAINS THE DH SELECTION PARAMETER. 


; SOHSEL 
:IE. ALL DH’S FOUND WILL BE TESTED. 


Aer TUP S TABLE TO BF ANN NG OF DH 
D a ORT TY Bees 


TRA Pp. vecTO OR. 
;START OF FLOATING VECTORS 
:PC OF IOT INSTR. 
OE he VECTOR “wae BTTH ADDRESS 
; NEXT ‘4 hee IS AN IOT TRAP. 


;UPDA TE_R3+R 
;HAVE WE REACHED TO TOP OF THE 
:VECTOR SPA 


CE? 
:IF NOT, REPEAT PROCESS. 


HPS SA 


;ZERO CPU PRIORITY. 
Ager ou E RECEIVER 


;WAIT... 


;ERROR MSG-NO DH RECEIVER INTERRUPT OCCURRED. 


;00_A MASTER CLEAR 
;CLEAR MAINTENANCE BIT 


s HVE, VECTOR RODRESS. 


Pay "FOR RETURN. 
MASTER CLEAR 


Cheek FOR OM11 BB*S VECTORS. 


09 
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3766 015570 gure 001000 BIC #1000,9(R2)+  ;CLEAR MAINTENANCE BIT. 
e767 015574 o950 
e788 :FIND OM11 BB VECTORS: 
2771 O1SS76 012702 O22050 13$: MOV #DMADRS , Re ;SET POINTERS TO BEGINNING OF 
2772 O1S602 012705 022106 MOV #OMVEC, RS “ADR TABLE & VECTOR TABLE. 
e773 015606 012737 015670 ooD0e0 MOV #16$,dRIOTVEC }SET IOT TRAP VECTOR. 

775 015614 o0Ss712 14$: ‘TST (Re) sHAVE WE CHECKED ALL DM’S? 
2778 015616 O01441 BEQ 17s sf YES, GE ou me 
5556 Bt eesG E3982 ABTARE oo0000 B48 #1000, J(R2) ig T MSTNTENONCE BIT. 
2779 015632 052772 000300 op0000 BIS #300, 3(R2) -ATTEMPT TO CAUSE INTERRUPT. 
2780 015640 005000 CLR RO 
2782 O1S642 o005200 15$: INC RO :WAIT.. 
2783 015644 001376 BNE 15$ 
2784 O1S646 104401 O26026 TYPE MSG3 sERROR MSG _-_NO DM11-BB_INTERRUPT OCCURRED. 
e785 O156S2 052772 OO4000 cooo00 BIS 84000, a(R2) :CLEAR BITS PREVIOUSLY SET. 
2786 O15660 O42772 001000 oo0000 BIC #1000; a(Re) CLEAR MAINTENANCE BIT. 
2787 015666 000752 BR 14 
2789 015670 011601 16$: MOV (SP) RI 
2790 015672 162701 oo0004 SUB #4 Gri ;CALCULATE VECTOR ADDRESS. 
2791 015676 010125 MOV 1’ (RS)+ SAV — VECTOR ADDRESS. 
2792 015700 O22b26 CMP (3B}s (SP)+ :POP STACK. 
2793 015702 O1e716 015614 MOV g {SP ‘SETUP FOR RETURN. 
2794 015706 OSe772 O04000 ooDD00 BIS $4000, aR) :CLEAR BITS PREVIOUSLY SET. 
2795 015714 042732 001000 BIC #1000;a(R2)+ CLEAR MAINTENANCE BIT AND 
2796 ‘POINT TO NEXT DMI1-BB ADDRESS. 
8737 015720 oo000e RTI 
2799 015722 012737 011112 o00020 178: MOV #SSCOPE,J#IOTVEC ;RESTORE IOT VECTOR FOR SCOPE ROUTINE. 
2800 015730 012600 MOY (SP)+,RO : ‘ 
2801 015732 012703 000390 MOV #300, R3 :START OF FLOATING VECTORS. 
e802 015736 012704 900302 MOV #302; R4 
2804 015742 010423 18%: MOV RY, (R3)+ FILL VECTOR AREA WITH ADDRESS OF NEXT 
2806 oO1S744 012724 oD0000 MOV #0, (R4)+ : NEXT INSTRUCTION iS A HALT. 
se Ge TEE oovoo ce auitae”* PME ba 

80 ptesee § 35% BLos }~=s:«a gs IF NOT, REPEAT UNTIL ADDRESSES 

2810 :377 T0777 ARE DON 

2811 015760 013701 oe2014 MOV QHDHVEC, RL ‘LET R1 POINT TO 1ST DH VECTOR ADDRESS. 
e8l2 015764 005737 Oec0l6 TST JHOHVECSE 315 THERE MORE THAN ONE ENT 

2213 015770 001403 BEQ oes :BRANCH IF NO. 

2814 015772 163701 o2e016 SUB DeDHVEC+2,R1 § ;DETERMINE NUMBER OF ADDRESSES 

2815 ;BET WEEN DH VECTORS (10(8) OR 20¢8)). 
2816 015776 oos4ol NEG RI “MAKE IT POSITIVE. 

2817 O16000 010167 004136 26$: MOY R1, ADRVEC :SAVE THAT NUMBER. 

2618 O16004 032777 OO00002 163126 BIT aBiTl, aSWR : SHOUL b DE DEVICE MAP BE TYPED OUT? 

2819 OleOle oo1441 BEG IF NO TURN. 

2220 O16014 104401 TYPE : TYPEOUT NP OF DH 8 DM11-88’°S 


e€el O16016 026073 DEVMAP ; FOUND. 


GO9 
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2822 016020 0127 021756 MOV #DHADRS,R1 ;R NNIN H ADDRESS TABLE. 
e8e3 Q160e4 bibroe Oee0i4 MOV hit VEC RS ‘Ras BEGINNING SF. Bu veer BR TREES 
2e8e4 016030 Q12703 Oee050 MOV py a3 R= BEGINNING OF DM11-BB ADDRESS TABLE. 
e825 016034 O12704 022106 MOV #OMVEC, R4Y=BEGINNING OF_DM11- i VECTOR TABLE. 
case 016040 005005 CLR RS ;CLEAR TABLE LINE COUNTER 
e828 016042 Ol2146 19$: MOV (R1)+,-(SP) ;MOVE DATA TO BE TYPED 
2829 016044 104403 TYPOS ; TYPE DATA 
2830 016046 006 -BYTE 6 
2831 016047 001 1. 
2832 016050 Ol2e% MOV (R2)+,-(SP) ;MOVE DATA TO BE TYPED 
2833 016052 104403 TYPOS ; TYPE DATA 
2834 016054 oos .BYTE 
2835 016055 000 .BYTE 
2836 016056 104401 026067 TYPE , SPACE 
2837 016062 012346 MOV (R3)+,-(SP) ;MOVE DATA TO BE TYPED. 
2838 016064 104403 TYPOS TYPE DATA. 
2839 016066 O06 BYTE 6 
2840 016067 001 -BYTE 1 
2841 016070 104401 026067 TYPE , SPACE 
e842 016074 012446 MOV (R4)+,-(SP) ;MOVE DATA TO BE TYPED. 
2843 016076 104403 TYPOS TYPE DATA. 
e844 O161 oos ~-BYTE 5 
2845 016101 000 BYTE O 
e846 016102 104401 TYPE ; TYPE A CARRIAGE RETURN & LINE FEED. 
2847 016104 O0l2e7 $CRLF 
2848 016106 005711 TST (R1) ;HAVE WE TYPED ALL DH ENTRIES? 
2849 016110 001354 BNE 19$ IF NOT, DO IT AGAIN. 
2e8S0 Ol611l2 104401 001227 TYPE $CRLF 
sees 016116 900207 20$: RTS PC ;IF YES, GO BACK TO MAIN PROGRAM. 
e8s3 ; THIS ROUTINE IS USED TO ACCEPT INPUT PARAMETERS FROM THE CONSOLE 
2854 ; TELETYPE 
2855 
2856 016120 104401 INPARA: TYPE 
2857 Olblee OeS440 YCWC ;"ASK FOR NO. RODRESSES BETWEEN VECTORS” 
e858 O1612e4 10441e RDOCT ; READ OCTAL NO. FM 
98) pieise aacane iy heel ia ;GET THE NO. HE TYeeD. 
e861 O1613e bee700 000010 CMP #10,R0 10d) AUORESSES BE BETWEEN VECTORS ? 
2862 016136 901406 BEQ 4§ YES 
2863 016140 022700 000920 CMP #20,RO0 0) ADDRESSES BETWEEN VECTORS ?? 
2864 016144 001403 BEQ 4$ ;BR IF YES 
e86S 016146 000764 BR INPARA :BSK tye OVER AG 
2866 016150 012700 000920 3$: MOV #20,R0 ATT ANT i en 2 ADORESSES 
2857 016154 005067 OO4166 4$: CLR DPFLG CteaR “PaTY RNS TEST 
e868 016160 005067 004174 CLR RETFLG ; INIT EST RETURN. FLAG 
cose 016164 000207 RTS PC RETURN 70 CALLER 
2871 QO16166 012767 177777 003520 INPARX: MOV #-1, VCFLG sagt START AT 200 FLAG 
e87e O16174 000167 163444 MP BEGINA CO START UP 
e873 016200 Q12700 177777 INPARC: MOY #-1,RO SET FLAG IN RO 
2874 016204 005067 003504 CLR VCFLG ‘INIT VECTOR SET UP FLAG 
2875 Ol6210 005067 004132 CLR DPFLG ; CLEAR PATTERNS TESTS PLAS 
£876 Ol6e14 005067 004140 CLR RETFLG ; INIT ECHO TEST RETURN 
2877 Olée20 000167 163420 JMP BEGINA ;G0 ASK FOR SELECT BARAMETER 
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INPAR: 
Biges6 827? BOOGCY 1ee702 EYt 
0162 BEQ 
B1e540 TOOL 1$: TYPE 
Olse4e O0e4747 INMSG1 
016244 104412 RDOCT 
O1l6e4%6 012601 MOV 
016250 001403 BEQ 
Bi bsee Rta Ya 000176 2s: nae 
0770 B 
16260 7 4 INPAR1: 
ieses 84377) BGG0di iseeue Bt 
O1l6e72 001405 BEQ 
016274 104401 1$: TYPE 
016276 025013 INMSG2 
016300 104412 RDCCT 
016302 012601 MOV 
Bib sts 001403 BEQ 
16306 004767 000306 2s: JSR 
016312 000770 BR 
016314 005767 004040 INPAR3: TST 
016320 001402 BEQ 
Ol63ee OO00167 166426 JMP 
016326 005767 004014 1$: TST 
016332 001402 BES 
016334 Q00167 167614 JMP 
016340 013701 022144 2s: MOV 
016344 005700 TST 
016346 100404 BMI 
016350 032777 000001 162562 I’ 
016356 001405 BER 
016360 104401 4$; TYPE 
016362 OeS0be INMSG3 
see ety ond 
bies78 BoTaas BEQ 
016372 010167 003132 3$: MOV 
16376 pis? 2 177777 003156 INPARY: MOV 
16404 022777 OQ00001 1lbeSeb BIT 
Ol6412 001407 BEQ 
018414 104401 TYPE 
O16416 025376 INMSGA 
Ol64e0 104412 RDOCT 
Ol642e 012601 MOV 
Ol64e4% 001402 BEQ 
O164e6 010167 003100 MOV 
1643e 032777 OO0400 162500 15: BIT 
016440 0014 BEQ 
16442 10440] TYPE 
LEY44 9 OeS5226 INMSG7 
O1644%6 000000 HALT 
Q1e4SO 000167 163662 EXPAR: JMP 


HOS 
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wet He Senk 
2s 


(SP)+,R1 
INPARL 
ne » CHKADR 


watt, ash 
2s 


(SP)+,R1 
NPAR3 

C, CHKVCT 
1$ 

RETFLG 

1§ 
ECHO? 
OPFLG 
EXPAT2 
SESDHSEL, RI 


4$ 
#8170, dSWR 
3$ 


(SP)+,R1 
INPAR4 
R1, DHSEL 


tatty aah 


(SP)+,R1 
$ 


1 
R1,LINSEL 
wets, aSWR 


START2 


IHRE PRRBIEYERS 1 6 Be RB u NMRNBAL LY? 


ASK NFOR "DEVICE ADDRESS 
CET. IN WHAT is, TYPED 


THE NO. - * YPED 
eF IE REF LT 
HECK VALIDITY OF THE ADDR 


tee BRANCH 


HARE Pac TERS 6'Be ERPUr"WénuaLy® 


ASK ‘FOR. VECTOR ADDRESS 


;READ_IN WHAT HE TYPES 

:GET THE ADDRESS 

:BR IF DEFAULT 

:GO_ CHECK — OF VECTOR 
ERROR BRAN 


i LINE ECHO TESTS ? 


RETURN TO LINE ECHO TESTS 
;DATA aie TESTS ACTIVE 7? 


:BR IF _N 
:GO BACK TO PATTERNS TESTS 

"MOVE DEVICE SELECTION PARAMETER INTO RI. 
“START AT 210? 

:BRANCH IF YES. 

ie. PARAMETER TO BE INPUT MANUALLY? 

?ASK FOR DEVICE SELECTION PARAMETER 


;READ_IN WHAT HE TYPES 
‘Gh 1r THE oeratict PARAMETER 


; SET UP DH11 ‘Thy vad: | temeetine 
i g Line SELECT PARAMETER TO BE INPUT MANUALLY? 
‘ASK FOR LINE SELECT PARAMETER 


;READ WHAT HE TYPES 
;GET_ IT OFF p TACK 


;BR_IF_ DEFAULT 
SET LINE SELECT Oa tlie 
HALT AFT A. SET 


‘iF CONTINUE MESSAGE PRIOR TO HALTING 


;DEPRESS CONTINUE TO RESUME TESTING 
:G0 START UP THE PROGRAM 


MAINDEC-11 


DZDHNB.P11 


ae 


016550 
016552 


O16S56- 
01 


6562 
016564 


016700 


-DZDHN-B 


Set 


012703 


016704 
012322 


000207 
020127 
01 


000427 


MACY11 27(732) 
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160020 


160420 


000017 


000002 
003646 


003002 
003620 
002766 


021614 
000001 


021756 
003362 


000020 
021654 


000300 


001000 


000007 


o0000e 
003502 


002640 
003454 
002624 


162370 
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CHKADR: gue 


1$: 


els: 


223: 


6$: 


3$: 


4$: 
S$: 


CHKYCT: 


1$: 


es: 


21s: 


Ri, #160020 
4 
RL, #160420 


Gg 
#17,R1 


#DHADTB, R2 
#BIT0, aSWR 


#DHADRS, R3 


SDHSEL , RY 
(R3)+, (R2)+ 


; END 


i dp pes ABOVE OR EQUAL TO LOW LIMIT 


BR IF N 


:1S IT BELO THE HIGH LIMIT? 


; CONTINUE 


; N 
s CORRECT BOUNDARY ? 


;BR IF NOT 
i Rove Re URN PC AROUND »ERROR BRANCH 
ARE WE IN ECHO TESTS ? 


iB IF_N a 
ET UP DH11 DEVICE ADDRESS 


;PATTERNS TESTS ACTIVE ?? 
:BR_IF_NOT 
SET UP 4 bi ADDRESS 


POINT TO BEGIN OF ADDR TABLE 


ARE WE AUTOSIZING? 


;BRANCH IF 


NOT. 
POINT TO BEGINNING OF AUTOSIZER 
:DH ADDRESS TABL 


;MOVE CONTENTS OF AUTOSIZER DH TABLE 
;T0 THE TABLE USED BY PROGRAM. 


HAVE WE MOVED ALL TABLE ENTRIES? 
‘BRANCH IF NOT--ONE MORE TIME. 
;RETURN TO. INPUT R 


SET UP AT 
GEN 


E. 


ROUT INES. 


ERATE NEXT HII ADOR 
F TABLE ? ‘ 


: NOT 
RETURN TO INPUT ROUTINES 


;TELL HIM HE GOOFED 
;RETURN TO INPUT ROUTINES 


;BR IF NOT 
:1S IT ven Ow THE HIGH LIMIT? 


BR IF Y 


;IS ADDRESS ABOVE OR EQUAL TO LOW LIMIT 
;BR IF YES 


:BR IF NOT 
; CORRECT ppucey ? 


My RETURN PC PROUD > ERROR BRANCH 


ARE WE IN ECHO 


TESTS ? 


NOT 
i, UP DH11 VECTOR ADOR 


: CON 
s PATTERNS TESTS ACTIVE ?? 
SET UP DEVICE VECTOR 

: CONTINUE 


SEG O11! 


a 


543] 
2992 


11-DZDHN- 


Pll 


Bieree Qasre? BROBG! ezees ““** ERT 
16714 OQ01011 B 


016716 


016722 
016726 


016730 


012703 


016704 
012322 


006204 


000207 


010667 


000167 


10667 
12667 


000167 


016703 


000207 


MACY11 27(732) 
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022014 
003216 


021714 


Bt 7s 
002344 
175536 


002432 
oooode 


o0000e 


162100 


162036 


JO9 
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6$: MOV 


3$: MOV 


4$: TYPE 


S$: 


"BufbgdzrRer S78 TSE 


Bei Yeah FARE We 
35 


#DHVEC,R3 POINT "10 “BEGIN OF AUTOSIZER 
:DH VECTOR 
SDHSEL, RY 
(R3)+, (R2)+ ;MOVE CONTENTS OF AUTOSIZER VECTOR 
va ‘TABLE TO TABLE USED BY PROGRAM. 
RY sHAVE WE MOV L TA NTRIES? 
6S ; BRANCH IF N5p- “OnE IHRE Te 
c$ :RETU 0 INPUT 
R1, (R2)+ : SET uP aT ABLE ENT 
RO. R1 : GENERATE NEXT, DH11 RADDR 
SDAVCTB+4O,, R2 EN D OF Ta BLE ? 
S$ ?RETURN TO INPUT ROUTINES 
‘TELL HIM HE GOOFED 
PC ;RETURN TO INPUT ROUTINES 


; THESE TWO ROUTINES SERVICE UNEXPECTED BUS ERROR AND RSVD INSTR TRAPS 


BUSER: MOV 


1S: ESET 
J 


RESERR: iy 


1$: RESET 


;SAVE THE SP 
GET THE TRAP PC 
GET THE TRAP PSW 


EG 
Tope $REG1 
(SP) +, $REG2 


#STACK, SP RESET THE STACK POINTER 
ais, $LPERR “ALWAYS COME B 
Bae ae 
PC, CHPS1 
CKRST2 G0 RESTART: THE PROGRAM 
REG 


tops $REG1 seer THe T AP PC 


(SP)4+, SREGe RES t T He crari’P NTER 

475 SCPERR -ALWAYS C Cee 

15 ;UNEXPECTED RSVD INSTR ERROR TRAP 
; PREPARE TO RESTART 

PC, CHPS1 ?GO CLEAR PSW 

CKRST2 :GO RESTART THE PROGRAM 


;THIS ROUTINE IS CALLED WHEN A TEST NEEDS TO RESTORE THE TRAP 
;CATCHER IN THE DH11 VECTOR 


RESTRP: a 


DHVCT R3 ;GET VECTOR ADDRESS 
(R3) ‘RESTORE THE TRAP CATCHER 
ae (Ra) : 
4)+ 
R3, (R3) 
#2’ (R3)+ 
(R3)+ 
C ;RETURN TO CALLING TEST 


;THIS ROUTINE CALLED BY ANY TEST THAT NEEDS A TIMING WAIT LOOP 


SEG Cllz2 


MAINDEC-11-DZDHN-B 
DZOHNB.P11 


017152 


017236 


017240 
017244 
017246 


005267 
001005 
005367 


Beeri6 


000207 


012705 


000207 


022767 


000205 


005767 
001034 
005267 


MACY11 27(732) 
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003222 
003212 
o00002 


030202 
030502 


021576 


002410 
161742 


033500 
177777 


00008e 


002276 
002332 


002416 
002404 


002370 
CO232e 


002346 


Ca 
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AUP dE EER HE iH Th GR gE 
HE "ROUTINE Thay CALLED. IT" 70 ALLOW REPORTING AN ERROR MESSAGE 


TINEIT: INC TIMEB ;COUNT B 
BNE ;BR IF NOT ZERO 


DEC TINEA ; COUNT TIME A a 
ry 43 sp) : Bve Re PurA Be TO ALLOW ERROR REPORT 
1S: RTS PC ;RETURN TO THE CALLING TEST 


;THIS ROUTINE IS CALLED TO CLEAR ALL ENTRIES IN THE STATISTICS TABLES 
CLSTAT: MOV 5 RS 3SET UP POINTER TO BEGINNING 

1$: CLR (RS)+ LEAR ONE W 

CMP #RTOTAL+192. ,RS CLEARED. a ENTRIES ?? 

BNE 1$ ;BR IF N 

RTS PC 


;THIS ROUTINE IS CALLED TO RETRIEVE A NEW LPR CONSTANT 
;FROM THE LPR TABLE (LPRTAB) 


;CALLING SEQUENCE: 


: JSR RS, SETLPR ALL 
: BR NEWLIN ENIT BRANCH - EXECUTED AFTER ALL 
*13 BAUD RATES EXERCISED 


SETLPR: a #CURLPR,LPRPTR ; DONE | ENTRIES ?? 


EQ 3$ 
MOV JLPRPTR, CURLPR GET THE LPR CONSTANT 
TSTB aSWR ; QUICK TEST ? 
BMI 1$ ;BR IF NOT - SUPPLY THE WHOLE THING 
gt #33500, CURLPR ; 9600 wy D TEST ? 
oY #-1, QUICK ise aueK TEST FLAG 
1$: CLR QUICK :00 FULL TESTING AT 9600. BAUD 
es: ADD #2,LPRPTR ; UPDATE THE TABLE POINTER 
ADD #2,RS MOVE PC AROUND ERROR BRANCH 
33: RTS RS RETURN 


;THIS ROUTINE IS CALLED TO SETUP THE CHAR LENGTH SELECT BITS AND 
;LOAD THE OUTPUT DATA BUFFER 


;CALLING SEQUENCE: 


; JSR RS sere. ; CALL 
; BR NEWLP ;EXIT BRANCH AFTER ALL FOUR LNGTHS TESTED 
SETCL: pe Spon sEXIT at's ONLY ONE CHAR LNGTH ? 

INC CLSEL SSENERATE NEW CHAR LNGTH SELECT CODE 


SEG 0113 


MAINDEC-11-DZDHN-B 
DZOHNB.P11 


3108 17866 


173 

1 

1 
17300 
1 

1 

1 
17332 
1 


017340 


— 
TOP NN ee  e - OO00D 
NE£WM-OWONTOUCW-ODON) 


126 017344 


37 017376 


47 017400 


017454 


B6i4ee 
00 


062705 
000205 


010246 


000207 


022767 
001444 


000417 


MACY11 27(732) 
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ooo0c4 
o022S2 
002246 

4 


o0000e 


002226 
032776 


177777 
002124 
000060 


002142 
000020 


002324 


002274 
002262 
002254 


002200 


002162 
002144 
002136 


002132 
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MP #4, CLSEL 
TST QUICK 
BEQ 1$ 
INC QUICKX 
CLR CLSEL 
MOV #177760, CHRCNT 
1S: BIC #3, CURLPR 
BIS CLSEL , CURLPR 
ASL CHRCNT 
JSR PC, SUBUF 1 
ADD #2;R5 
23: RTS RS 


SEG 0114 
eg FOUR OF THEM ?? 
QUICK TEST FLAG SET ? 
;BR IF NOT 
“SET QUICK TEST EXIT FLAG 
D0 o! 7 BIT CHA 


CHARS 
;D0_ ONLY 32. CHAR BUFFER 
;SET UP THE CURRENT LPR 


;GENERATE CHAR COUNT 
; G0 SET UP THE OUTPUT BUFFER 
i OYE AROUND EXIT BRANCH 


;THIS ROUTINE IS CALLED TO LOAD THE OUTPUT DATA BUFFER WITH THE 


;REQUIRED BINARY COUNT PATTERN 
;CALLING SEQUENCE: 


; ISR PC, SUBUF 1 
SUBUF 1: 
MOV R2,-(SP) 
MOV R3,-(SP) 
MOV RY) -(SP) 
CLR RY 
MOV CHRCNT, R3 
MOV TBUF .R 
1$: MOVB RY, (Re) + 
INC 
INC R3 
BNE 1$ 
MOY (SP)+,R4 
MOV (SP)+'R3 
MOV (5P)+/Re 
RTS PC 


;CALL 


;;PUSH R2 ON STACK 
; § PUSH RS ON STACK 

“PUSH RY ON STACK 
INIT CHAR GENERATOR 
SET UP LOAD COUNT 
ipET Up BUFFER POINTER 
* GENERATE NEXT CHAR 


;THIS ROUTINE IS CALLED TO SET UP THE PARITY SELECT BITS 


;IN THE CURRENT LPR TEST CONSTANT 


;CALLING SEQUENCE: 


; JSR RS, SETPAR 
: BR NEWCL 
SETPAR: CMP #-1,PARBIT 
BEQ 
TST QUICK 
BEQ 
MOV #60, PARBIT 
18: BIC #60’ CURLPR 
BIS PeReT, CURLPR 
TST PAR 
BNE oe 
MOV #20, PARBIT 
BR ug 


‘ 


;CALL 

;EXIT BRANCH 

; DONE . PARITY COMBOS ? 
-BR IF Y 

s QUICK TEST FLAG SET ? 


F NO 
iBheck 0 ODD PARITY ONLY 
SET PARITY SELECT BITS 


ae ARTS 00 ? 
iSET_ SELECT BITS TO Ol 


DZ0H 


190 


bP bb bt fn be 


MAINDEC-11-DZDHN-B 
NB.P11 


017456 


017520 


017522 
OI 753 


17888 


17646 


17EBR 


017712 


pi 77e8 
17722 
017724 


022767 


012767 
Blere7 
2767 
0207 


117746 


016761 


005711 
100376 
000207 


MACY11 


000020 
000060 
ud0060 


177777 
o0000e 


017546 
ogg 340 
00010 


161374 
000200 
000123 
000176 
161334 
0C0007 


013761 
173332 


001190 
001566 
164562 


Bo4B00 
002266 
032776 


000010 


001616 
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002122 
002112 
002102 
002072 


160330 
160324 
160014 


161346 
000001 


000006 
000004 
000012 
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;SELECT BITS 10 ? 
iad" sect BITS 11 
jSELECT or li? 


BE TE 


eta Pe AROUND EXIT BRANCH 


; THIS ROUTINE IS CALLED TO SET UP FOR KEYBOARD INTERRUPTS 


2S: CHP #20, PARBIT 
MO #60, PARBIT 
BR 4g 

3S: CMP #60, PARBIT 
BNE $ 
MOV #-1, PARBIT 

4g: ADD #82,R5 

cs: RTS 5 

KYBD1: MOV #KYBD2, 60 
MOV #340, 68 
MOV #10 177560 
RTS PC 


;SET UP THE INPUT VECTOR 


;ENABLE KYBD_INTRS 
‘RETURN TO START TESTING 


; THIS ROUTINE SERVICES THE KEYBOARD INTERRUPT AND LOOKS FOR AN "S” 
;BEING TYPED TO INDICATE ABORT AND PRINT STATISTICS 


KYBDe: 


1$: 


es: 


MOVB 
BICB 


aSTKB, -(SP) 
#200, (SP) 
#123, (SP) 
#SWREG, SWR 
SAUTOB, #1 


#7, (SP) 
2 


bs yee ¥ 


Pesta 


;GET CHAR TYPED 
;CLEAR ag BITS 
sl S_AN ” YPED ? 


USING SOFTWARE SWR? 
;BRANCH IF YE 
RUNNING IN AUTO MODE? 
;BRANCH IF YES 

T A_<tG@> 


i BRANCH IF NO 
OP 


ITYPE <¢G> 


ge THe WORLD 

ESET “ SP 

$60 CLEAR PSW 

DUMP THE STATISTICS 


sO URN AND FORGET IT 


; THIS ROUTINE SENDS A TEST BUFFER TO REMOTE DH11 LINE 
SENDPe: fey 
MOV 


1$: 


DHADR, R1 
#BIT11, (RL) 
LINE, (R1) 
aTBUF, RS 


R5, BCR(R1) 
Lite CAR(R 


(R1) 
1$ 
PC 


;SET UP_DH SCR ADDR 
‘CLEAR THE DH11 
;SET LINE SELECT 
SET UP BYTE COUNT 


;SET CURRENT ADDRESS 
;SET LINE PARAMETERS 
SACTIVATE THE LINE 


;DONE TRANSMITTING ?? 
:BR_IF NOT 


RETURN TO CONTROL ROUTINE "SENDP1” 


SEG 0115 
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3214 
cai ;THIS ROUTINE IS CALLED TO LOAD FILLERS INTO ECHO BUFFER 
17 017726 116704 002506 LDFILL: MOVB FILLB,R4Y ;GET COUNT OF FILLERS 
Bee tere ee coco |My SE lt Ptegs ome 
3514 31 p5a8 ies e lble3 MOV Tue Feat N EHO BUFFER TOO 
3221 017750 116723 O0246e 1$: MOVB FILLA, (R3)+ LOAD A FILLER CHAR 
3222 017754 116722 O024S6 MOVB FILLA, (Re)+ 
gee3 017760 005304 DEC RY ;COUNT IT ) 
32e4 017762 001372 BNE 1S BR TIL REQUIRED COUNT LOADED 
3e2eS 017764 116704 O024S0 MOVB FILLB,RY :SET UP BYTE COUNT REG 
oe TN fees me 
3550 17774 BT it Bt 000010 MOV R4Y, BCR(R1) ;LOAD BCR REG 
3) 020000 000207 RTS PC ‘RETURN TO RINT2 
acak ; THIS ROUTINE IS CALLED TO SET UP XMITTER SPEED 
3233 020002 104401 INXSP: TYPE ;ASK USER TO TYPE SPEED 
3234 020004 026631 XSMSG1 j TRANSMITTER SPEED ?” 
323S 0200068 012767 O22156 002140 1S: MOV #XSPTAB,XSPTR  ;SET_UP TABLE POINTER 
3236 020014 042767 036000 001554 BIC #36000,CURLPR INIT SPEED SEL Xd BITS 
3237 Oe00e2 104413 RDDEC READ SPEED HE 
3238 020004 005716 TST (SP) ; DEFAULT TO SE00. BAUD ? 
3239 Oe0026 001426 BEQ 4$ YE 
3240 020030 027716 002120 es: CMP @XSPTR, (SP) i TYPED ENTRY MATCH TABLE ENTRY ? 
3e41 020934 001010 BNE 3$ ;BR_IF NOT 
3e42 020036 062767 000002 002110 ADD #2, XSPTR ;POINT TO SELECT BITS IN TABLE - 
3243 O20044 057767 002104 001524 BIS aXSPTR,CURLPR ;SET SPEED SELECT BITS 
3e44 Oe00S2 00S7e6 TST (SP)+ sFIX STACK 
a 020054 000417 BR S$ ; CONTINUE 
3247 020056 062767 000004 o002070 35: ADD ;POINT yo. NEXT iil 
3248 020064 022767 Oeee42 O0e0be CMP axsPraasse. ,XSPTR; ie. * ell 
3249 020072 001356 BNE 
3250 020074 104401 TYPE SER OR Nessa 3 z 
3251 020076 026657 XSMSGe i eINVAL spe R SPEED - TRY AGAIN 
3eSe 020100 0057e6 TST (SP)+ 
ose 020102 000741 BR 1$ 60 TRY acAIN 


See BRIE REPRE "7000 omen os: BUG RRRQUOLCURLAR BET UE, FANN dR SOD. se 


a 020114 000207 S$: RTS PC ;RETURN TO CALLER 
36 ;THIS ROUTINE IS CALLED TO SET UP RECEIVER SPEED 
ss GSS ae MSP: TE Ut Se er 
ee me arty ifs 
3267 020140 05716 TST = (SP) DEF 
Ee solug Bozzi 002072 es: ene JASPTR, (SP) :Pieds om MATCH TABLE ENTRY ? 


wee Pit Po 


OZDHNB 


020150 
Oe 


901010 
0 


052767 
005726 


000207 


105067 


105767 
001411 
122767 
001405 


7 
000207 


MACY11 27(732) 
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oo000e 
002056 


ooo004 
022330 


001500 


006005 


000015 
005763 


005751 
000116 
000131 


001254 
033503 
177442 
177552 


o02062 
001410 


002042 
002034 


001350 


005741 
00$731 


001244 


B10 
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3$: 


4§: 


S$: 


RTS 


$ 

#2, RSPTR 
JRSPTR, CURLPR 
(SP)+ 


;BR 4 NOT 

:POINT TO SELECT BITS IN TABLE 
;SET SPEED SELECT BITS 

sFIX_ STACK 

; CONTINUE 


;POINT TO NEXT ae 
TABLE ? 


aREPTABS., RSPTR: jEND ho 


(SP)+ 

1$ 

#1500, CURLPR 
(SP)+ 


PC 


Peale ‘. M Pasace 
:"INVALID RCVR SPEED - TRY AGAIN” 


:FIX THE SP 

GO TRY AGAIN 

;SET UP DEFAULT TO 9600. BAUD 
:FIX STACK POINTER 


;RETURN TO CALLER 


;THIS ROUTINE IS CALLED TO SET UP LINE PARAMETERS FM KYBD 


LPRIN: 


1$: 


eS: 


33: 


4$: 


S$: 


ECe 


(SP)+,RO 
#15,RO0 


RO,ECe 


1$ 

ECe 

3$ 
#116,EC2 


#131,EC2 
LPRIN 


4$ 

CURLPR 

S$ 

#33503, CURLPR 


PC} INFCNT 
PC’ 


;CLEAR ECHO BUFFER 

;"DO YOU WANT TO CHANGE "LPR”?” 
;GET iy HE Mas 

;WAS_IT A <CR> 

:BR IF YES 

‘ECHO WHAT HE TYPED 

;GO WAIT FOR TERMINATOR 

;<CR> ONLY ?? 


; WA 
if S IT A “YES” ?? 


SL 
SET DEFAULT 9600 BAUD,8 BITS NO PARITY 
ONT INUE 


‘60 INPUT AND SET UP XMIT SPEED 

;GO INPUT AND SET UP RCVR SPEED 

;GO INPUT AND SET UP CHAR LENGTH 

;GO INPUT AND SET UP NO. OF STOP BITS 
; NPUT AND SET UP PARITY SELECTION 
30 INPUT AND SET UP FILLER CHAR 
;GO_INPUT AND SET UP FILLER COUNT 


0! 
RETURN TO CALLER 


; THIS ROUTINE IS CALLED TO SET UP CHAR LENCTH BITS 


SEG 0117 


ao“ 


;CLEAR THE ECHO BUFFER 


iBSK FOR INPUT “ 

iNT CH CHAR LENGTH Seer BITR 
CHAR HE T 

‘GET THAT CHE TYPED 

‘WAS IT A <CR> 

BR IF IT WAS 


ee 
;ECHO WHAT HE TYPED 

;G0 3A Aad » FERMINATOR 
: <CR> ONL 

;BR IF YES 

: STRIP ASCII 

;6 BITS ? 

;BR_IF NOT 

:SET UP FOR & BIT CHARS 
: CONTINUE 

:7 ° 

;BR_IF_NOT 

;SET UP FOR 7 BIT CHARS 
. S NUE 

;BR IF YES 

: ERROR 


MESSAGE 
j PINVALID CHAR LENGTH = TRY AGAIN” 


O TRY AGAIN 
ET UP FOR 8 BIT CHARS 
: RETURN TO CALLER 


;THIS ROUTINE IS CALLED TO SET UP NO. OF STOP BITS 
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3326 020372 105067 o0S64S INCL: CLRB  €EC2 
3327 020376 104401 TYPE 
3328 O20400 627010 CLMSG1 
3323 geo 042767 000003 O01166 1S: BIC #3, CURLPR 
33 0410 104410 ROCHR 
3331 O20412e 012600 MOV (SP + RO 
3332 O20414 i22700 oo001s CMPBs«w#15, RO 
3333 O20420 O0140S BEQ 118’ 
3334 be04 110067 005615 MOV RO. EC2 

406 104401 TYP 

3336 020430 026243 EC2 
3337 O20432 000763 BR 1$ 
3338 020434 105767 o0S603 11$:  TSTB  €&C2 
3339 O20440 001432 BEQ 4g 
3340 Oe0442 142767 000060 005573 BICB #60,EC2 
3341 O204SO 122767 000006 O0SS56S CMPB s-&6, EC 
3342 020456 001004 BNE 2 
3343 020460 052767 000001 001110 BIS #1, CURLPR 
3344 020466 O00422 BR 
334S 020470 122767 oO00007 OOSSYS 25: CMPB ss, EC 
3346 020476 001004 BNE 3 
3347 Oe0S00 052767 o00002 001070 BIS #2, CURLPR 
3348 020506 O00412 BR 
3349 020510 122767 000010 o0SSes 35: CMPB sw. , EC2 
3350 020516 001403 BEQ 4g 
3351 020520 104401 TYPE 
3352 020522 02704 CLMSG2 
3253 020524 gg7ee BR INCL 
3354 020526 052767 o00003 ocolo4e 4S: BIS #3, CURLPR 
3355 020534 000207 cs: RTS PC 
3356 
3357 
3358 
3359 020536 105067 o0ssol INSB: CLRB €EC2 
3360 Oc0542 104401 TYPE 
33e3 puede (odutD 1s: RBCHA 
3363 O205S0 012600 MOV (SP)+,RO 
3364 O205S2 122700 oooo1s CMPB S,RO 
3365 020556 001405 BEQ 1$ 
3366 020560 110067 0054S7 MOVB RO, EC2 
3367 O20564 104401 TYPE 
3368 020566 026243 EC2 
3358 pea9 OOPS pos44s 11S Pere ae 
335 nae ate BEQ 3$ 
2372 020600 142767 oO0060 005435 BICB #60,EC2 
3373 020606 122767 O00002 005427 CMPB ss, EC 
3374 020614 001004 BNE § 
3375 020616 052767 o00004 oD07S2 BIS #4, CURLPR 
aa76 re eta p00001 oos407 2s BAPE #1,EC2 
3375 BSpESE rated EQ ae 
3379 020636 104401 TYPE 
3380 O20640 027151 SBMSG2 
3381 Oede42 000735 INSB 


;CLEAR ECHO BUFFER 
ASK FOR INPUT 


; "NO. OF STOP BITS - 1 OR2 


; F YE 
;ECHO WHAT HE TYPED 


68 yt AR TERMINATOR 


ERROR N 


SAGE 
FTNVAL ID NO. STOP BITS - TRY AGAIN” 


G0 TRY AGAIN 


SEG 0118 
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DZDHNB.P11 POWER DOWN AND UP ROUTINES SEG 0119 
44 042767 000004 000724 3$: #4, CURLPR P FOR ONE STOP BIT 
3 ostece basen? a: RISB RETURN TO CALLER 
3385 ; THIS ROUTINE IS CALLED TO SET UP PARITY SELECT BITS 
3387 020654 105067 005363 INPB: CLRB  €EC2 ;CLEAR ECHO BUFFER 
3388 O20660 104401 TYPE ASK FOR I NPUT 
3389 O20b62 027217 PBMSG1 : "PARITY <CR> 
3390 O20664 042767 OO00060 OOT704 1S: BIC #60, CURLPR : IN NIT. FOR “No "PART ty SRE CKING 
39 Oe 72 10441 RDCHR GET CHA 
392 020674 Oie6 MOV (SP)+. RO + fuat He YPED 
$393 020676 122700 000015 CHP #15,RO cs IT 8 A «CR» 2° 
3395 ie 704 To hae? 005333 MOVB RO ECE Be TH rhe CHAR TYPED 
3396 020710 104401 TYPE 
3397 020712 026243 ECe 
3335 Donets FOOoPS cosa us: ere te te A A eeataie 
3333 859938 ABT485 " -BEQ 4 : is 
3401 020724 122767 O00105 005311 CMPB =: #105, EC2 EVEN PARITY ?? 
3405 Nae pesoe3 000060 000634 Bre #60, CURLPR ic T UP FOR EVEN PARITY 
Supa 020742 nae Be ug’ + CBNTINUE 
340S O20744 122767 000117 O0S271 2%: CMPB =s- #117, EC2 ; ODD PARITY 
34 0752 001004 BNE NOT 
407 020754 052767 000020 900614 BIS #20, CURLPR SET UP FOR ODD PARITY 
3408 O20762° 000403 BR 4g NTINUE 
3409 020764 104401 38: TYPE TERROR MESSAG 
3410 020766 027265 PBMSG2 INVALID PARITY - TRY AGAIN” 
3411 020770 000731 BR INPB GO TRY AGAIN 
ile 020772 900207 ug: RTS Pc ‘RETURN TO CALLER 
tt sTHIS ROUTINE IS CALLED TO SET UP “FILL” CHAR 
3416 020774 105067 005243 INFCHR: CLRB C2 :CLEAR ECHO BUFFER 
3417 021000 005067 001432 CLR FILLA INIT TEMP STORAGE FOR CHAR 
3418 021004 104401 TYPE ; G0 ASK FOR FILLER CHAR 
3419 021006 627324 FILC1 “"ETIT CHAR ? 
3420 021010 005067 001420 1S: CLR DHF ILL : ININ FILL TL OCATION 
3421 021014 104410 RDCHR GET CHAR TYPED 
3422 021016 012600 MOV (SP)+. RO :GET char HE TYPED 
3423 021020 122700 oo001s CMPB ss #15, RO WAS IT A <CR> 7 
3424 021024 OO140S BEQ : YES 
3425 021026 110067 005211 MOVB RO, ECe2 ‘ECHO WHAT HE TYPED 
3426 021032 104401 TYPE 
3427 021034 026243 EC2 
388 021036 000764 BR 1$ GO WAIT FOR TERMINATOR 
3430 921040 105767 005177 2S: TS18 ECe ;<CR> ONLY 29 
Fe es (ee NCL BRM wn. | ee AST, (eee gee 
ee St be AbBoB> ; ate igeve 15 & CALLER 
3436 :THIS ROUTINE IS CALLED TO SET UP “FILL” COUNT 


MAINDEC- ~ | esemee™ 


OZDHNB . P 


3438 851054 
3440 072 


3492 021270 
3493 021276 


P8398; 


027352 


116767 


4 
000207 


004767 


005200 
001374 


Bc0307 


004767 


012767 


066767 
005567 


MACY11 27(732) 
POWER DOWN AND UP ROUTINES 


001350 


001326 
000001 


000360 
001302 


oo0246 


000252 


000220 
000405 
032776 


000170 


000377 


009136 


6 
leSeSe2 


001070 
001062 


001316 


001306 
001304 


001074 
001070 
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INFCNT: GLB. 


FILC2 


1$: MOVB 
es: 4 


FILLB 


($P) 
1 

(SP), DHFILL 
os 

#1, OHFILL 
(SP)+ 


8360 * FILL 
HFILL,FILLB 


AMDT aaa unpre FOR COUNT 
;"FILL COUNT rt -_ 
EGET be” 

;SET UP COUNT TYPED 

: CONTINU 

SET ve OR 1 FILLER 

{LIMIT COUNT TQ 15. MAX 

;SAVE IT_FOR LATER 


R ETURN TO GAL LER 
; THIS ROUTINE CALLED TO SET UP al TERNATING 1/0 PATTERN 


SUPATA: JSR 
MOV 


1$: MOVB 


PC, CLALL 
CHRCNT RO 
#TBUF 

ese, tRe)s 


1$ 
PC 


:GO CLEAR XMIT AND RCV BUFFERS 
GET CHAR COUNT 
sPOINT | 1) Q XMIT BUFFER 


bet DA 


iT 
;BR TILL BUFFER FULL 
;RETURN TO “DPATA” ROUTINE 


; THIS ROUTINE IS CALLED TO SET UP UP COUNT PATTERN 


SUPATU: JSR 


1§: MOV 


PC, CLALL 
CHRCNT RO 
BUF , RS 


;GO_ CLEAR BUFFERS 

:GET eo OF CHARS TO LOAD 
:POINT TO XMITTR BUFFER 
INIT CHAR GENERATOR 

LOAD ON E BY M3 

iSoUNT TT NEXT BYTE 


;BR_ TIL BUFFER FULL 
RETURN TO “DPATU" ROUTINE 


; THIS ROUTINE IS CALLED TO SET UP DOWN COUNT PATTERN 


SUPATD: JSR 


1$: MOVB 


PC, CLALL 
CHRCNT RO 


;CLEAR_THE BUFFERS 
;SET UP_COUNT TO LOAD 
:POINT TO XMIT BUFFER 
INIT CHAR SRAAATOR 
LOAD_ONE 

‘nit NEW CHAR 


;BR TIL BUFFER 
RETURN TO SBRATAT ROUTINE 


; THIS ROUTINE CALLED TO LOAD RANDOM DATA PATTERN 


SUPATR: A 


1$: ADD 
A . 


PC CLALL 
CHRC NTR 


8TBUF £0 
sizsese, RANA 
RANA, RANB 
RANA 


;GO_ CLEAR BUFFERS 

SET UP COUNT TO ey 

:POINT TO XMITTR BUFFER 

INIT RANDOM NUMBER GENERATOR 


;GENERATE RANDOM NO. 


MAIND 
026H 


are 
4 
: 


C-11-DZDHN- 


Pll 


081316 


021314 


C2eit¥e4 


MACY1 


POWER DOWN AN 


ag86e7 


116725 
005200 


Bot30? 


004767 


74 
000207 


016700 


012700 
005020 
022700 
001374 
000207 


Boidse 


001044 


000056 


001010 


000216 
gee 
177774 


000766 


032776 
034126 


27(732) 


F10 
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UP ROUTINES 


001054 


00i00e 


2 mer 


MOVB —- RANA, (RS)+ ;LOAD A BYTE 
INC RO 3 COUNT IT mee fuck 
Bye Be +E TURN Rb OBBaT Re ROUTINE 


; THIS ROUTINE LOADS A SINGLE CHAR THROUGHOUT BUFFER 
;GO CLEAR BUFFERS 


SUPATS: JSR PC, CLALL 
MOV CHRCNT RO INIT CHAR COUNTER 
MOV F RS ‘POINT TO XMIT BUFFER 
1$: MOVB SINGLE CRS)+ ;LOAD ONE CHAR 
INC RO :C 
BNE 1 ‘BR TIL BUFFER 
RTS PC RETURN TO OBpaTSé ROUTINE 


; THIS ROUTINE CALLED TO INIT CHAR LENGTH MASK FOR PATTERNS TESTS 
SUCLMK: bea CURLPR, RO ;GET CURRENT “LPR” 


a0, Conk sINIT FO Ore ERP Dut AP BITS 
vv 
is; FoF = Ad {DORE SETUPS? 
BEQ 2$ -BR IF eS 
ASLB = CLMSK ‘SHIFT MASK LEFT 
DEC RO 390 UNT IT 
BR 1$ SEE IF ITS RIGHT ON 


2$: RTS PC RETURN TO CALLER 
;ROUTINE TO CLEAR XMIT AND recerifh BUFFERS 


es MOV aTBUF RO ;SET UP POINTER 


CLR (RO)+ ;CLEAR A WORD 

CMP sENBUFS , RO ; DONE ALL_LOCATIONS ? 
BNE 1$ :BR NOT 

RTS Re 


~, 
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i THTR ROUTINE Tag ObhFP TO SET PSW PRIORITY TO 000 IN ORDER 


021426 012746 oco000 CHPS1: MOV #0,-(SP) ;NEW PSW 
021432 012746 021440 MOV #1$,-(SP) ‘NEW PC . 
as tdae RB PRBS 1S: Rté PC fat BR 3 CALLING TEST 


; THIS ROUTINE DOES THE SAME THING EXCEPT IT SET THE PSW 
PRIORITY TO 340 (LEVEL 7 ) TO LOCK OUT INTRS 


1442 Bist poo 320 CHPS2: HOY #340, tS NEW PSW 

1446 QOle746 021454 MOV #1$,-(SP) ;NEW PC 

O214Se o0000e RTI : CHANGE THE PSW 

0214S4 000207 1$: RTS PC ; RETURN TO CALLING TEST 
tpi ROUTINE S ALSO FOR LSI11 COMPATIBILITY AND IT IS CALLED 

AVE THE PSW IN “STMPO” 

O214S&6 OO0SO46 SAPS: CLR -{SP) ; TEMP STORAGE TO SAVE PSW 

021460 O16746 156350 MOV 34, -(SP) :SAVE TRAP YECTOR POINTER 

021464 012767 O21474 156342 MOV #1, 34 :GO TO 1$ ON TRAP 

021472 104400 TRAP :G 

021474 016666 o00002 OC000E 1S: MOV 2(SP),6(SP) ;GET PSW SAVED 

Oe1502 012716 021510 MOV #2$, (SP) ;GO TO 2$ ON RTI 

021506 000002 RTI 

021519 012667 156320 2$: MOV (SP)+,34 ;RESTORE VECTOR 

021514 Qle667 157462 MOY (SP)+, STMPO :FINALLY SAVE PSW IN $TMPO 

O2iS20 900207 RTS PC 
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OZOHNB. P11 DH11 PROGRAM CONSTANTS AND VARIABLES 

6 -SBTTL ill ff noGhet CONSTANTS fit VARIABLES 

§ ; i® HLEAARKLALAKE REKRKKLAEA ARE LALA LELELRELELELELEE 

& iRODTT TONAL *PROGRAM CONSTANTS *AND VARIABLES 
goed 5 RARER LHAR ARAL RL LEA LEAR ELA RARE LEELA EERE RAL EL LAER EREA ALLA EL ARLE 
3 
3565 000002 NRC= ; INDEX CONST. TO ACCESS NEXT RCVD CHAR REG 
3567 000004 LPR= INDEX CONST. TO ACCESS LINE PARAMETER REG. 
3568 o00006 CAR= ; INDEX CONST. TO ACCESS CURRENT rae REG. 
3569 900019 BCR=10 ; INDEX CONST. TO ACCESS BYTE COUNT REG. 
3570 000012 BAR=1e2 ; INDEX CONST. TO ACCESS BUFFER ACTIVE REG. 
3571 000014 BKR=14 ; INDEX CONST. TO ACCESS BREAK CONTROL REG. 
2278 000016 SSR=16 ; INDEX CONST. TO ACCESS SILO STATUS REG. 
3574 Oe2lS2ee 000000 DHADR: 0 ;HOLDS THE “SCR” ADDRESS OF THE DH11 UNDER TEST 
3575 021524 9000000 ; ; HOLDS THE 1ST VECTOR ADDRESS OF THE DH11 UNDER TEST 
3576 O21Se6 000000 SELMSK: 0 ;BIT TST MARKER FOR SELECTING DH11’S 
3577 021530 000901 DHSEL: 1 SPECIFIES DH11’S SELECTED FOR TEST 
3578 021532 177777 LINSEL: 177777 ; SPECIFIES LINES TO TES 
3579 021534 000000 LINMSK: Q ;MARKER USED TO TEST FOR LINES TO TEST 
spay 021536 000000 DRPLIN: 0 ;DROPPED LINE FLAGS 
3 
3582 021540 o00000 QUICK: OQ aoe TEST FLAG - ALLOWS SINGLE PATTERN TEST 
3583 ; ON L TESTS NOT USING 9600. BAU 
Sees 021542 000000 QUICKX: 0 ‘ALLOWS SUB-TEST EXIT DURING QUICK TEST 
3586 
3688 
2589 ; THIS TABLE CONTAINS THIRTEEN Cong TeeTs USED TO ESTABLISH 
3590 THE INITIAL UN PARAMETERS FOR THE THIRTEEN PROGRAMMABLE BALD 
2591 RATES - EACH AMETER INITIALLY weed? LES NO PARITY CHECKING 
a5 :AND A CHARACTER *CENGTH OF FIVE BITS 
3594 021544 033500 LPRTAB: 33500 ;9600 BAUD 
3595 pst 4 04200 4200 ;75 BAUD 
3$ 155 06300 ;110 BAUD 
3597 Oel5Se 010400 10400 3134.5 BAUD 
3598 021554 012500 12509 ;150 BAUD 
3599 021556 014600 14600 ;200 BAUD 
3600 021560 016700 16700 ;300 BAUD 
3601 OelS6e 021000 . 21000 ;600 BAUD 

021564 023100 _ 23100 ;1200 BAUD 

3603 de 25200 25200 1800 BAU 
3604 021570 027300 27300 32400 BAU 
3605 021572 931400 31400 :4300 BAUD 
ae 021574 002100 2100 ;50 BAUD 
sete 021576 000000 CURLPR: ;CONTAINS CURRENT “LPR” CONSTANT 
3610 O21600 o00000 LPRPTR: ;CONTAINS POINTER TO LPR TASL 


3613 021604 000000 CLSEL: ;CHAR LENGTH SELECT PARAMETER 
3614 1606 900000 PARSIT: ;PARITY SELECT PARAMETER 


0 
0 
2611 Oe1602 000000 CHRCNT: 0 LOADED WITH CURRENT CHAR COUNT 
C 
0 
36i& 021610 000000 RDONE: 0 ; SOFTWARE DONE FLAG 


MAINDEC-11-DZDHN-B 
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3617 
8 


021612 


021614 


021732 
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DH11 PROGRAM CONSTANTS AND VARIABLES 
RBFEND: 0 
;DH11 ADDRESS TABLE - THIS TABLE CONTAINS THE “SCR” ADDRESS FOR UP TS 


oo0009 


160020 


000710 
oocoso 


120240 


120240 


: SIXTEEN DH11°S 


DHADTB: 160020 
160040 


160400 


16:09 PAGE 79 


;HOLDS END OF BUFFER ADDRESS 


;ADDRESS OF FIRST DH11 
ADDRESS OF SECOND DH11 


;ADDRESS OF THE LAST DH11 


;DH11 VECTOR TABLE - THIS TABLE CONTAINS THE VECTOR ADDRESSES FOR UP 


;T0 SIXTEEN DH11°S 
DHVCTB: a4 


YCFLG: 


0 


;ADDRESS OF VECTOR FOR FIRST DH11 
:ADDRESS OF VECTOR FOR SECOND OHI! 


;ADDRESS OF VECTOR FOR LAST DH11 
; VECTOR DISPLACEMENT FLAG 


3 at a Y! LeveL Margy - THIS TABLE CONTAINS THE PRIORITY LEVELS 
Ree adxt FENP at 3 - Mi Reve LEVEL IS STORED IN THE LOW BYTE 
‘AND HE XMTTR LEVEL IN THE HIGH BYTE 


BRLYL: 


po 


120240 


;BRLEVELS FOR FIRST DH11 
:BR LEVELS FOR SECOND DH11 
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OZDHNB.P11 DH11 PROGRAM CONSTANTS AND VARIABLES 
22 BEE 1aES re 
3675 Qel740 1e0240 120240 
3676 Qel74e 120240 120240 
3677 744 120240 120240 
3678 021746 120240 120240 

79 021750 120240 120240 
3680 Oel7Se 120240 120240 
spak 021754 120240 120240 ;BR LEVELS FOR LAST DH11 
ay ; THIS DH ADDRESS TABLE IS FILLED BY THE AUTOSIZER. 
3685 021756 DHADRS: 

3686 021756 000000 -WORD OQ 
3687 021760 000000 WORD OQ 
3688 021762 000000 WORD Q 
3689 021764 000000 WORD Q 
3690 000000 WORD OQ 
3691 021770 000000 WORD OQ 
3692 0el77e 000000 WORD Q 
3€93 74 000000 WORD Q 
3694 021776 000000 WORD OQ 
3695 QOee000 000000 WOR a] 
3696 O2e00e 000000 WORD Q 
3697 Oe2004 000000 WORD Q 
36 0&6 000000 WORD Q 
3699 22010 000000 -WORD OQ 
0 Oe201e oc0000 -WORD OQ 
3706 ; THIS DH VECTOR TABLE IS FILLED BY THE AUTOSIZER. 
3704 022014 DHVEC 
3705 Oee014 000000 / 0 
3706 022016 CO00000 WORD OQ 
oy tees te Be 
ce es HS Be 
3710 Oeede& 000000 WORD 0 
3711 Oee030 000000 WORD OQ 
3712 OQee032 000000 WORD 0 
3713 2034 000000 WORD OQ 
3714 2036 000000 ORD Q 
3715 Q22040 pees WORD 8 
3716 Oee04e 00000 WORD 
3717 OQee044 900000 -WORD Q 
aie O2e046 000000 -WORD 0 
3760 ; THIS DM ADDRESS TABLE IF FILLED BY THE AUTOSIZER. 
37e 20 DMADRS: 
37e BSSneD 000000 -WORD OQ 
3724 Qee0Se 000000 -WORD Q 
3725 Oee0S4 000000 «WO 0 
2726 Oee0S6 000000 -WORD QO 
2727 QeedtO 000000 -WORD OQ 
3726 Oee0be 000000 -WORD OQ 


ORCC tt 11-DZDHN-B 


022064 
6 


022104 


022106 
06 


O2e1Se 


022154 


e 
Oe2204 
Oe2206 


DH11 PROGR 


000000 


000000 
000000 


000000 


000000 
000000 
000000 

000 


000 
000000 
000000 


000900 


o004S4 
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SA 


K10 


ND VARIABLE SEQ 0126 


= 

oa 

2 

Oo 
ONOND0O00RI00 


;THIS DM VECTOR TABLE IS FILLED BY THE AUTOSIZER. 
DMVEC: 
oW 


;ADDRESSES BETWEEN VECTORS - FILLED BY THE AUTOSIZER. 
L: ‘DEVICE SELECT PARAMETER - FILLED BY THE AUTOSIZER. 
DHRLVL: .BYTE QO ;BR LEVEL FOR ve 
. LEVEL FOR XMITTER 
DHNUM: 0 ; CONTAINS NUMBER OF THE DH11 UNDER TEST 
LINE: CONTINES NUMBER OF THE LINE UNDER TEST 
; TABLES USED TO SELECT xHITTR AND RCVR SPEEDS 


; THE TABLES CONSIST OF 13. TWO WORD ENTRIES - ONE FOR EACH 

j ALLOWABLE BAUD RATE. THE FIRST WORD IS THE ACTUAL BAUD RATE 
N DECIMAL AND THE SECOND WORD 3 pls 3 ENCODED BINARY WORD 

THAT SETS THAT BAUD RATE IN THE ™ 


= 
oO 
.*] 
o 
oO = O0O0O DBDOOOOOVCOOO0OO000 


XSPTR: 0 ;CONTAINS POINTER TO FOLLOWING TABLE 
XSPTAB: 50. ;50. BAUD 
2000 
4“? ;75. BAUD 
4000 
110. 3110. BAUD 
6000 
1345. 3134.5 BAUD 
10000 
150. 3150. BAUD 
12000 
200. ;200. BAUD 
14000 
300. ;300 BAUD 


L10 
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3785 022210 016000 16000 

? le :600. BAUD 

3585 BS5si§ BeAdae ate 

3788 Oee2l6 O02260 1200. ;1200. BAUD 

3789 O22220 o22000 22000 

3730 O2222e 003419 1809. :1800. BAUD 

3792 B5555¢ pe dea Spb. ;2400. BAUD 

3793 022230 O26000 26000 

3794 O22232 011300 4g00. ;4800. BAUD 

3795 Oe2e34 030000 30000 

oe fesse eae 3 sone 

3738 O22e42 000000 RSPTR: O :CONTAINS POINTER TO FOLLOWING TABLE 
3800 o22244 oD00b2 RSPTAB: SO. :S0. BAUD 

3801 022246 000100 100 

3802 Oeeesd 000113 75. 75. BAUD 

3803 Oeees2e 000200 200 

3804 022254 OO01S6 110. ;110. BAUD 

3805 022256 000300 300 

3806 O22260 002501 134S. 3134.5 BAUD 

3807 Oe2e6be O00400 400 

3808 Oe2264 o00226 150. :150. SAUD 
3809 O22266 O00500 500 

3810 022270 000310 200. ;200. BAUD 

3811 Oe2272 oO00600 60 
3812 Occe74 o004s4 300. ;300 BAUD 
3813 Oee276 000700 700 
3814 022300 001130 600. 600. BAUD 
3815 O22302 001000 1000 
381 O23 4 002260 1200. 1200. BAUD 
3817 Oee3 6 001100 1100 
3818 Oe2310 003410 1800. ;1800. BAUD 
3819 Oe23i2 001200 1200 
ml Bey Bi ce ee ate 
3822 Oeese0 011300 435 : ;4800. BAUD 

3823 Oeez22 001400 1400 
3824 022324 O22600 9600. ;9600. BAUD 
3825 022326 001500 1500 

$e? ADDRESS POINTERS TO SET UP TABLES WHEN INPUTTING PARAMETERS 

3829 022330 op0000 ADPTR: O ;POINTS TO ADDRESS TABLE 

3830 022332 000000 VCPTR: 0O *POINTS TO VECTOR TABLE 

3831 022334 000000 BRPTR: 0 ‘POINTS TO BR LEVEL TABLE 

3833 022336 00000 TITFLG: O ;FLAG TO ALLOW PRINTING TITLE ONLY ONCE 
3834 022340 o00000 TIMEA: O GENERAL PURPOSE TIMERS 

3836 O22342 000000 TIMEB: O 

7 44 00 CEXIT: : CONTROL -C XIT_FLAG FM ECHO TESTS 

3634 feesue So000 SBriG: 6 COT TERNS TEST FL 

3839 022350 000000 DATCNT: O : ITERATION COUNTER. CroR PATTERNS TEST 
3846 22352 000000 DATPAT: O *FLAGS TYPE PATTERN 


MAINDEC-11-DZDHN-B 
-Pll 


DZDHN 


34) 
3843 


Deets 
022360 
Besse 
022366 
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DH11 PROGRAM CONSTANTS AND VARIABLES 


ila 


000000 


Booob5 
000008 


022370 000000 


Be5354 


BB0828 


022434 000000 


022436 
022440 


000000 
000000 


SINGL 


DHFILL: 


FILLA: 
FILLB: 


H 8 


RETFLG: 


mays grasa 
ie SLUGR Ro A RIERUAS vital 


;CHAR LENGTH BIT CLR MASK 


ee abPreR” bbe bPReLe — ECHO TEST 
INGLE LINE 


sHe8 AND COUNT FOR S 


eng f S R GE _— FILLER CHAR 
;SAME FOR COUNT 


SEG 0128 


MAINDEC-11-DZDHN-B MACY11 
STANDARD ERROR MESSAG BUFFERS 


DZDOHNB.P11 


Be 


issues 


quale FeDUE 8 
0131 1105 

Glee O200SS 
050117 O4eSe0 


001116 021576 


001166 001170 

000000 
000 000 
000 000 
000 ooo 
1e4 047101 
bbe a) fobBd 
051514 


102 0431; 
020122 041501 
042526 051040 


27(732) 


410 


051125 


001164 
001172 


000 
000 


babies 
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¢ 
Mey Fee eiies ria PE PPPPETeTeT erry TTT TTT Tr Tr Tree 


R MESSAGE INFORMATION - MESSAGE BUFFERS AND POINTERS 
a SSREREESRSEALSSSSSELESSANASERASSEALSSNESEATSSRERESHEETEELOSIEE 


DRORUTION FOR MESSAGE 1 
EM1: -ASCIZ ’*NON EX MEMORY ERROR - CROPPED LINE # ° 


DH1: -ASCIZ * (PC) CURLPR DEVADR REGADR WAS S78’ 


-EVEN 
DT1: -WORD SERRPC,CURLPR, SREG1, SREG2, SREG3, SREGY,O 


DFe: -BYTE 0,0,0,0,0,0,0,0 


; INFORMATION FOR MESSAGE 2 
EMe: -ASCIZ ’TRANSMITTER FALSE INTERRUPT - DROPPED LINE & ° 


; INFORMATION FOR MESSAGE 3 
EM3: -ASCIZ ‘BUFFER ACTIVE REGISTER ERROR - DROPPED LINE # ’ 


; INFORMATION FOR MESSAGE 4 


SEG 0129 


MAINDEC-11-D2DHN-B MACY 
Pll STANDARD TERROR 


DZDHNB. 


046040 


S RR 
—-Or~ 
cee 
S2ee-er- 


80 
—-to 
£000 


ll 


052131 
04 


000040 


051122 


020105 


047514 


27(732) 


MESSAG BUFFERS 


pen 


020105 


0471CS 


021440 


O44S0S 


0 
042101 


Bll 
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EM4: 


-ASCIZ 


*BYTE COUNT REGISTER ERROR - DROPPED LINE & 


; INFORMATION FOR MESSAGE S 


EMS: 


-ASCIZ 


*CURRENT ADDRESS REGISTER ERROR - OROPPED LINE b 


; INFORMATION FOR MESSAGE 6 
*SILO OVERFLOW ERROR - DROPPED LINE & 


EME: 


-ASCIZ 


; INFORMATION FOR MESSAGE 7 
*RECEIVER FALSE INTERRUPT - DROPPED LINE & ° 


EM?: 


-ASCIZ 


; INFORMATION FOR MESSAGE 10 
*INVALID DATA IN SILO - DROPPED LINE & 


EM10: 


DHe: 


-ASCIZ 


-ASCIZ 


(P 


~ 


C) 


CURLPR CHAR 8 


WASADR SHBADR 


WAS 


$/8° 


a ee ee “ 


hen’ p : tee” Yl1 27(732)_ 27-SEP-76 16:09 PAGE 86 
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3368 Oe334e Oedlee OS144O 041110 


.EVEN 
3973 023372 001116 021576 O0ll6e DTe: -WORD S$ERRPC,CURLPR, SREGO, SREG!, SREG2, SREG3, SREGY,O 
3974 023400 001164 001166 001170 
3975 023406 001172 000000 
3977 ; INFORMATION FOR MESSAGE 11 
3979 O23412 O40S04 O40S24 O4244O EM11: .ASCIZ 'DATA ERROR - LINE & ’ 
3980 Oe34e0 OS11e2 051117 26440 
3981 O23426 O46040 047111 020105 
sabe ; INFORMATION FOR MESSAGE 12 


3986 O23440 042524 052123 alee EMle:  .ASCIZ ‘*TEST TIMEOUT - DROPPED LINE # ” 


40 
oe 023500 d24040 pesees 020051 DH3: -ASCIZ * (PC) CURLPR RTOTAL XTOTAL RDONE* 


3996 023530 
3997 023536 O2e0040 O4elee 047117 
3999 2 . EVEN 


4000 O23546 001116 021576 001202 ODT3: -WORD SERRPC,CURLPR, STMPO,STMP1,ROONE,O 
Wone 023554 001204 021610 000000 
Sone ; INFORMATION FOR MESSAGE 13 
OS Oe23562 001202 001204 001206 OT: -WORD STMPO,STMP1,STMP2,STMP3,STMP4Y, STMPS, STMP6,0 
4006 023570 O01e10 OOlele 001214 
4007 023576 O01216 O00 
4008 023602 000 001 O01 OFI: -BYTE 0,1,1,1,1,1,1,9 


4009 023605 001 001 001 


4011 

wis ; INFORMATION FOR MESSAGE 14 

4014 023612 OS 123 O5110S €M14: .ASCIZ ’*BUS ERROR TRAP TO 04’ 

4015 0236 O47See Oe0lee 051124 

4016 Oe36e6 050101 052040 020117 

4017 023634 032060 090 ; 
4018 023637 O40 OS00S0 024503 DH: -ASCIZ ° (PC) (PS) (SP) TRAPPC TRAPPS 
4019 023644 020040 Oe0040 050050 

4020 O23652 024523 O20040 020040 

4021 Oe3660 051450 Oe4S20 d20040 

4022 040 050120 


022666 052040 See 
4023 023674 020103 OS2e040 O40See 


MAINDEC-11-DZDHN-B 


OZOKNB. 


Pll 


023702 


023706 
023714 


eae oe oe oe 
eh 


furu 
Be SRITRAS ORY 


8 BIBPRIRERERES 


S 
a 
a8 & 


050120 


001116 
001164 


0 
030440 


044523 


Paws 
Beene RECS 
88 2e8see 


ll 


000123 


001202 
001166 


042126 
051124 


oo 
zeSSaaBKe 
SRB eotaNS 


27(732) 


001176 
000000 


O4444o 
052040 
047524 


042514 
020105 
40 


022152 
0ee37e 


pa? 185 
02010 
040520 
020116 
042040 


020051 
Bae aas 

O40 
020040 
051120 
0S2517 


022152 
000000 
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MACY 
STANDARD ERROR MESSAG BUFFERS 


BYEN 
OTs: -WORD SERRPC,STMPO, SREG6,SREG1, SREG2,O 


; INFORMATION FOR MESSAGE 15 
EMIS: .ASCIZ ‘’RSVD INSTR TRAP TO 10’ 


; INFORMATION FOR MESSAGE 16 
EM16: .ASCIZ ‘SINGLE LINE ECHO TEST - INTR WAIT TIMEOUT’ 


DHS: -ASCIZ ° (PC) DEVADR LINE (SCR) CURLPR EXFLAG’ 


. EVEN 
DT6: -WORD SERRPC,SREG1,LINE, STMPO,CURLPR,EXFLAG,O 


; INFORMATION FOR MESSAGE 17 
EM17: .ASCIZ ’*ALTERNATING 1/0 PATTERN TEST DONE’ 


DHG: =. ASCIZ =* (PC) DEVADR LINE CURLPR ICOUNT’ 


. EVEN 
DT?: -WORD SERRPC,DHADR,LINE,CURLPR, SREGO,O 


; INFORMATION FOR MESSAGE 20 


Ell 
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OZOHNB.P11 STANDARD ERROR MESSAG BUFFERS SEG 0133 
4080 4e4 5 SY EM20: .ASCIZ ‘BINARY UP COUNT PATTERN TEST DONE’ 
Osi Gsvesd being Gentes Qa780s 
4082 Oe%ebe 0471 040520 
4083 024270 bso 150 020116 


4084 024276 O4eS24 be2 123 042040 
408S 024304 047117 000105 


4086 

mit tA ; INFORMATION FOR MESSAGE 21 

4088 024310 oO4FS0e O40516 OS4S2e2 EM2l: .ASCIZ ‘BINARY DOWN COUNT PATTERN TEST DONE" 
4090 024316 042040 3517 020116 


05351 
4091 4324 04750 471 0124 
409. 433. Buoeea Be 154 BET S 
4093 024340 020116 O4eSe4 OSele3 
4094 024346 O4e040 047117 000105 


4095 

er . ; INFORMATION FOR MESSAGE 22 

40 4354 O40S22 O4¥2116 O46517 EMe2:  .ASCIZ ’*RANDOM DATA PATTERN TEST DONE’ 
4099 4 Bed Bei 1 B8i0 


362 40 1 
4100 024370 O40S20 OSeie4 051105 
4101 024376 020116 O4eSe4 052123 
4102 O24404 O42040 047117 000105 
4104 ; INFORMATION FOR MESSAGE 23 


4106 Oe44le eaaan 043516 O42514 EM23: .ASCIZ ‘*SINGLE CHAR PATTERN TEST DONE’ 


es 
4110 Oe444e O42040 047117 000105 
; INFORMATION FOR MESSAGE 24 
OCe44S0 OS4S24% O42520 020104 EMe4:  .ASCIZ ‘TYPED BUFFER PATTERN TEST DONE’ 
Ce44Se 052502 043106 051195 
024464 OS0040 052101 42524 


Oe447e O471lee OS2040 051505 
024s 020124 047504 O4eS16 
Oe4S06 00 


; INFORMATION FOR MESSAGE 2S 
024507 104 peetot 020101 EMeS: .ASCIZ ‘DATA PATTERNS TEST TIMEOUT’ 


46 
Oe4S4e Oe4040 041520 020051 OH7: -ASCIZ ° (PC) DEVADR LINE CURLPR ICOUNT PATCDE’ 
SO 20040 


Poe ee ee ee oo 
= +0 be Se SSR ee 
RPERLEBSBVRR PON Vise Now coro 

ro) 

AY 

£ 

mn 

_ 

= 

e 

A 

oO 

R 

— 

_— 

Oo 

nn 


4 
Ce4606 052116 bz0RM0 040520 


11 
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OZO0HN 


024614 


024636 


STANDARD ERROR MESSAG BUFFERS 


Radps3 042504 000 


.EVEN 
OO1116 OeiSe2 oe21S2 OTLO: 
021576 O0l1162 001164 
900000 


EVEN 


WORD 


SERRPC ,DHADR, LINE, CURLPR, SREGO, $REG1 , 0 


SEG 0134 


MAINDEC-11-DZDHN-B 
OZOHNS.P11 


024640 


0 
CeSebb 


MISCELANEOUS TABLES AND 


005015 


05e515 


MACY11 27(732) 


040515 
026503 
O42 


030461 
0S201e 


047531 
02123 


006524 
0S2123 


005015 
050131 

40 
OS1111 
030510 
042520 


e3 
020131 
006516 


020125 
051440 


Gll 
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SoTL MISCELANEQUS TABLES AND MESSAGE AND DATA BUFFERS 
i ATSCELLANEOUS MESSAGES 
5 RERRRRE RELA ERLE ARLE ER ELE LAER LEELA ERELE EEE E LEAL LEE FLA SELL AREAL 


TITLE: 


TITLE2: 


INMSG1: 


INMSG2: 


INMSG3: 


INMSG4: 


INMSGS: 


INMSG6: 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


HAKKAR AA AAA ALAA AAA AAA RA RAL ALARA SAA LA REALL AL ALLL ELSES 


€15><12>*MAINDEC-11-DZDHN-B DH11 DATA RELIABILITY TEST’<15><12 


¢15><1l2>"TESTING DH1i & °<15><12> 


<15><12>* TYPE SCR ADDRESS FOR FIRST OH11’<15>< 12> 


(15><1le>* TYPE VECTOR ADDRESS FOR FIRST OH11°<15>< 12> 


(15><12>"TYPE DH11 DEVICE SELECTION PARAMETER’<15>< 12> 


415><12>" INVALID DH11 SCR ADDRESS - TRY AGAIN’<iS><le> 


€15><12>"INVALIO OHJ1 VECTOR ADDRESS - TRY AGAIN'<15> 


€15><12>*YOU MUST SELECT AT LEAST ONE DH1i°<15><12> 


<1Z) 


H11 
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OZDHNB.P11 MISCELANEOUS TABLES AND MESSAGE AND DATA BUFFERS SES 9126 


2 ae Be Re Be 

4 1 1 bry 4251 

a : oe 30510 O06461 

4204 025326 005015 O42S04 051120 INMSG7: .ASCIZ <15><12>’DEPRESS “CONTINUE” TO START TESTING’<15><12> 
0253 


025356 

4209 025364 Bneen? OS2l2e3 047111 

4ell S376 OOSO1S OS545e4% O42S20 INMSGA: .ASTIZ <15><1l2>’TYPE LINE SELECTION PARAMETER’<15><12> 
025404 


1 
4215 Oes4e6 O40S2e O4eS15 O4eSe4 
4216 O2S434 O06See o000le 


4¥218 OeS44O 005015 oO54S5e4% O4eSeO vCWwC: .ASCIZ <15><12>’TYPE NO. OF ADDRESSES (OCTSL) BETWEEN VECTORS (iC OR 20)*<i1S><«1 


4220 OeS4S4 OS O42101 051104 
4221 S462 051505 042523 Oe 
4Y2e2e 025470 7450 O0Se2 046101 
4223 025476 Oe0051 O4eS02 053524 
4224 025504 2S0S 020116 O4eSe6 
42 025512 052103 051117 20123 
4Yee6 O0esSe0 030450 O20060 051117 
42e7 OeSS2e6 ole Oe4460 005015 
42 025534 0 


4359 025535 O15 O42012 020110 STMSG1: .ASCIZ <15><12>"DH & STATISTICS:° 
4230 Oe5542 020043 O20040 052123 
4231 hseeee OS2101 051511 O44Se4 


4223 aeseee aa § O4eSe4 052123 STMSG2: .ASCIZ <15><12>’TESTING LINE & °<i5><1la> 
111 020197 O44514 
4235 025576 O42516 ae 020040 


00 
4237 025607 O15 OY6012 O47111 STMSG3: .ASCIZ <15><12>*LINE # WAS DROPPED’<15><12> 


424 nasa ROs0 5 hens Te pas: STMSG4: .ASCIZ <15><12>"LINE # RTOTAL XTOTAL DATERR PARERR FRMERR OVRERR*<15><12> 


051 04251 
ca Hee GN Gaakis ae 
4252 ;MESSAGES USED BY THE AUTOSIZER. 

4253 025733 116 020117 O44104 MSG1: .ASCIZ /NO DH11’S WERE FOUND/<15><12> 
4255 025740 O3046i Of1447 OS3440 


MAINDEC-i1-DZDHN-B 
OZDHNB.P11 


025746 


026351 
O2b356 
026364 
02t372 


MISCELANEOUS TABLES AND 


051105 


Oeb440 


MACY11 27(732) 


020105 


005015 


020040 


02044C 


047506 


030461 
051104 


005015 


005015 


000012 


042516 


050131 


020067 


Ill 
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MESSAGE AND DATA BUFFERS 


MSGe: 


MSG3: 


SPACE: . 
DEVMAP: . 


-ASCIZ 


-ASCIZ 


-ASCII 


-ASCIZ 


/NO DH RECEIVER INTERRUPT OCCURRED/<15>< 12> 


“NO DM11-BB INTERRUPT OCCURRED. 7<15><12> 


/ / 
€15><12>/DH11, DM11-BB DEVICE MAP: 7<15><12) 


€15><12>/DH11 DH11 OM11-BB OM11-86/ 


¢15><12>/ADRS VECT ADRS VECT/¢«15><12><15><12> 


;MESSAGES FOR INPUTTING PARAMETERS TO ECHO TESTS 


EC: 


Ekg: 
EC3: 
ECMSG1: 


ECMSGe: 


-ASCIZ 
-ASCI 
-AS 
-ASCIZ 


.ASCIZ 


7 *4€15><12> 


* _*<15><12> 
<15><12>’SINGLE LINE ECHO TEST - CONNECT TERMINAL TC OH11 TEST LINE’<15> 


€15><12>°TYPE LINE # (00 - 17 OCTAL)’ 


SEG 0127 


MAINDEC-11-DZDHN-B 
OZDHNB.P11 


026400 
026406 


O264Se2 
026460 
026466 


026714 


026722 
026730 


27 
27 


oo oO 
i} 


19 
16 


041460 
0 


047111 
005015 


051124 
044501 
005015 


O44S01 


00501 
04604 


MACY11 27(732) 
MISCELANEOUS TABLES AND MESSAGE AND DATA BUFFERS SEG 0128 


040524 


aS616 
020105 


0 
052123 
006505 


OS4S24 


020051 
052012 


006516 
O42See 


051105 
042105 


044412 


020131 
006516 


47108 


024514 


51505 


00001e 
042520 


0S6S22 
020117 


020077 
o40S2e2 


00001e 
042503 


051440 
037440 


05311 


000012 


051101 
052107 


27-SEP-76 


ECMSG2: 


ECMSG4: 


LPMSS: 


XSMSG1: 


XSMSGe: 


RSMSG1: 


RSMSGe: 


CLMSG1: 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


Jil 


16:09 PAGE 93 


€15><12>*TESTING LINE # <- GO TYPE IN ON TEST LINE*<15><12> 


€15><12@>* TYPE: [CONTROL-C TO EXIT] [CONTROL-E TO ECHO BUFFER]’<15><12> 


¢15><12>"DO YOU WANT TO CHANGE “LPR” (Y OR N) ? ’ 


€15><12>’ TRANSMITTER SPEED °° 


€15><12>* INVALID XMIT SPEED - TRY AGAIN’<15>< 12> 


<15><12>’RECEIVER SPEED °’ 


<15><12>* INVALID RCVR SPEED - TRY AGAIN*’<15><12> 


<15><12>’CHAR LENGTH (6, 7, OR 8) ? ’ 


MAI 


DZOHNB 


NDEC-11-DZDHN-B 
HNB.P11 


027024 
08708 


027046 


027272 
027300 


027423 
027430 


020110 
026067 
024470 


005015 
044514 


044501 
005015 


000012 
005015 


015 
020105 


MACY11 27(732) 


033050 
047440 
037440 


047111 


006516 


047516 
051440 
044S0e 
020061 
020051 


O4441e2 
042111 
051440 
04 


024516 


0S201e 
042523 


Ne 
tie 


040526 


0 
000012 
020056 


O201ee 
020051 


053116 


006516 


046114 
040510 
051105 


046114 
Useni 


020040 


050131 
042116 


K11 
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MISCELANEOUS TABLES AND MESSAGE AND DATA BUFFERS SES 0139 


CLMSGe: 


SBMSG1: 


SBMSG2: 


PBMSG1: 


PBMSGe: 


FILC1: 


FILCe: 


SNMSG1: 


SNMSG2: 


-ASCIZ 


-ASCIZ 


~ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


415><i2>" INVALID CHAR LENGTH - TRY AGAIN’<15><12> 


€15><12>"NO. OF STOP BITS (1 OR 2) ? ° 


€15><12>* INVALID NO. STOP BITS - TRY AGAIN’<15><12> 


(15><12>"PARITY SELECTION (E, 0, OR <CR>) ? ° 


¢15><12>" INVALID PARITY - TRY AGAIN’<1§>< 12> 


¢15><12>’FILLER CHARACTER ? ° 


€15><12>*FILLER COUNT °’ 


(15><12>*SEND MODE -(Y OR N) ° 


(15><12>’TYPE SEND BUFFER - TERMINATE WITH CONTROL-C°<15><12> 


MAINOEC-11-DZDHN-B 
DZCHNB.P11 


027540 


041040 


000040 


MACY11 27(732) 27-S 
MISCELANEOUS TABLES AND MESSAGE AND DATA BUFFERS 


043125 
0 


041455 
041412 
0 


047040 


042506 


Lil 


EP-76 16:09 PAGE 95 


oosois 


040510 SNMS 
040520 


037451 


Gh, .asclz (15><12>*CHANGE PARAMETERS (Y OR N)? ° 
X 


MAINDEC-11-DZDHN-B 
. MISCELANEOUS TABLES AND 


OZDHNB.P11 


B01 76 


005015 
0S0040 


MACY11 27(732) 


O30iz8 


o40S24 


031061 


o40S26 
044523 


005015 
5210 


M11 
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Apmee Teese va 


DPMSGe: .ASCIZ 


DPMSG3: .ASCIZ 


DPMSG4: .ASCIZ 


OPMSGS: .ASCIZ 


DPMSG6: .ASCIZ 


DPMSG7: .ASCIZ 


DPMSGA: .ASCIZ 


UTTING PATTERNS T BARS 
(15><12>’ "DATE Balter RNS T - CONNECT TEST JUMPER’<15>< 12> 


¢15><12>’BUFFER SIZE ? (1 - S12)’ 
¢15>¢12>" INVALID SIZE - TRY AGAIN’<15)<12> 


¢15><12>'PATTERN TYPE ? (A,U,D,R,S,3 OR <CR>) °<15><1le> 


¢15><12>*SET SRO7=1 TO LOCK ON PATTERN’<15>< 12> 


¢15><12>* INVALID PATTERN - TRY AGAIN’<15><12> 


415><12>*TYPE SINGLE TEST CHAR *<15><1l2> 


«15><12>’TYPE IN TEST BUFFER - TERMINATE WITH CONTROL-C’*<15>< 12> 


- EVEN 
;ERROR STATISTICS TABLES 


SEG 0141 


MAINDEC-11-DZDHN-8 Y 
DZDH MISCELANEOUS TABLES AND MESSAGE AND DATA BUFFERS 


NB.P11 


Hed B3Hs88 BO30e0 


rhate 


030442 
030502 
030504 

S06 


030512 
030514 


030516 


» 032776 


034126 


rare 


000020 


000000 


oo0000 
000000 


001130 


001130 
oco000 
000001 


N11 
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RTOTAL: -BLiH i: Hot CRS Si TED eR Ene 


DATERR: .BLKW ot S PER LINE 
CORERR: -BLRH ie Hata Faas ERRORS. PBL] Mee 
FRMERR: .BLKW ; TOTAL FRAMING ERRORS: PER LINE 
;STATISTICS TABLES POINTERS 

DEPTR: O ;CONTAINS POINTERS TO STAT TABLES 
PEPTR: OQ 

ORPTR: O 

FRPTR: O 

RBFPTR: O ;CONTAINS INPUT BUFFER POINTER 
TBFPTR: O : CONTAINS OUTPUT BUFFER POINTER 


;600. WORD RECEIVER INPUT BUFFER 
RBUF: .BLKW 600. 


;600(10) BYTE TRANSMITTER OUTPUT DATA BUFFER 


. EVEN 

TBUF: .BLKB 600. 

ENBUFS: 0 ;MARK END OF BUFFERS 
- END 


SEG 0142 


MAINDEC-11-DZDHN-B 


DZDHNB.P11 
ABASE = 000000 
ACOW! = 000000 


ADDWO = 000000 
ADDW1 = 000000 
ADDW1O= 000000 
A l= 000 


MACY11 27(732) 27-SEP-76 16:09 PAGE 99 
CROSS REFERENCE TABLE -- USER SYMBOLS 


es8 e399 
258 301 
258 302 
es8 27 
258 303 
258 304 
es8 313 
258 314 
2S8 315 
258 316 
258 317 
258 31 
258 305 
258 30 
258 307 
258 08 
258 309 
258 310 
258 311 
eS8 3le 
258 264 
aie ears 979% 38298 
Bos aie a7SPe 
258 269 
258 270 
258 261 
eS8 286 
es8 290 
258 293 
eS8 296 
258 280 
258 288 
258 291 
S8 234 
2s8 266 
258 267 
258 260 
258 281 
258 289 
258 e3e 
258 295 
eS8 263 
258 
2067 21728 
1818 2060 2128 21708 
$32 169% 
2062 2130 21718 
es8 271 
es8 
258 265 
es8 e7e 
558 26568 
es8 297 
258 29 


8 
647% 718 722 726 1102 1152* 1461% 1526 1530 1534 


32094 


3x 


- 


f 


Cs 


SEG 0143 


2 aE Ee aE 


- ~ eee 


MAINDEC-11-DZDHN-B 


DOZOHNB.P11 
BCR = 000010 
BEGIN 001626 


BITO = 000001 
BITOO = 000001 
BITO1 = 000002 
BITO2 = OOO004 
BITO3 = 000010 
BITOY = 000020 
BITOS = OO0040 
BITO& = 000100 
BITO? = 000200 
BITO8 = 000400 
BITOS = 001000 
BIT1 = 000002 
BIT1O0 = 002000 
BIT11 = 004000 
BIT1le = 010000 
BIT13 = 020000 
BIT14 = 040000 
BIT1S = 100000 
BITe = 000004 
BIT3 = 000010 
BITY = 000020 
BITS = 000040 
BIT& = 000100 
BIT? = 000200 
BIT8 = O00400 
BITS = O01 
BKR = 000014 
BPTVEC= 000014 
BRLYL 021716 
BRPTR O22 
BUSER 016762 
CAR = Ropoue 
CEXIT e344 
CHKADR Q164S4 
CHKYCT vU16620 
C 021426 
¢ 021442 
CHRCNT 021602 
CKER 004112 
KERDP O106: 
CKRST1 O14S 
CKRSTe 014624 
KSWR = 104407 
CLAL 021410 


MS 
LSEL 04 
CLSTAT 017136 


737 
35698 


MACY11 27(732) 
CROSS REFERENCE TABLE -- USER SYMBOLS 


74S 


tele 
S61 


1098% 


2872 
786 


1126% 


2877 
2880 


1118 


703 
1550 


1813 
1Sle 


38318 
1564 
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1137% 


2891 


723 
1592 


1662 


35254 


36134 


1148 


2910 


742 
1611 


2581# 
35338 
811 


1446% 


SEG 0144 
1545 1549 1553 eS80* 32e06#  3228% 


2919 2953 2991 


795 814 832 1649 1078 1471 
1629 1772 2568 3202 


3207% 35688 


831 1044 1492 1510 1529 1S48 
1565 2576 2580 3108* 3111% 3128 


MAITNDEC-11-DZDHN-B MACY11 27(732) 27-SEP-76 16:09 PAGE 101 
OZDHNB.P11 CROSS REFERENCE TABLE -- USER SYMBOLS SEG 0145 
ce c z ao0e90 nH 507 aut 
KURLPR Beis? 10 79 a7 3079% 3082 3109 3110% 3152  3153% 3208 3235% 32e43% 3255s 
3265* 3272% 3284* 3311 3313%  3329%  3343% 3347% 3354%  3375%  3382% 3390% 3402s 
3407% 3514 36088 3879 3973 4000 4054 4075 4138 
DATCNT 022350 1296 1299% 1300 1303 1304% 1314% 1317% 1318 1321 1322 1332% 1335* 1336 
39 1340 1350% 1353 1354 1357 1358 1381% 1399% 1400 1403 1404 = 1411# 
iyge 1449 sdae 14S3% 1472 38398 
DATERR 030302 86 964 44958 
DATPAT Oee3Se 12eSS* 1268 1272 1276 1280 1284 1288 1368 1370% 1372# 1374% 1473 3840 
= 177570 101% eee S20 
DEPTR 030502 867% 73% 917% 4S0e# 
DEVMAP 026073 2821 42708 
DF 1 023602 414 4008 % 
022604 344 351 358 365 372 379 386 393 400 407 421 428 435 
442 449 456 463 470 477 484 38828 
DHADR 021522 pre $ 659# 999% 1048 1214* 1248 1471% 2608% 2946% 2950% 3201 35743 
DHADRS 021756 2658 2666 2713 2729 e82e 2879 e9ss 36854 
DHADTB O2e1614 580 e9Se2 2966 36228 
DHFILL 022434 342e0% 3432% 3433 S444% B446e B448e 3449 38504 
022150 S83 S86e 599 938 978% 37618 
022146 $97# 616 1047* 1052 1238* 1241 37598 
021530 590 985 2917% 3577% 
DHSET1 014654 646 1460 eSb8s 
DHST 002700 6468 
a oc a a ea aaiten 
DHVCT Oe15e4 596% 614 1000* 1050 1215* 1239 e9s4* 2988* 3036 35754 
DHYCTB 021654 581 2990 3004 36428 
DHVEC. 022014 2730 e811 e8le 2814 2823 2890 2993 37048 
DHWAIT O0SeSe2 10698 
DH1 O2e511 342 349 356 363 370 377 384 3870% 
DHe 023305 391 39638 
DH3 023500 405 39928 
37 419 40188 
DHS Oe40e2 433 4O4S# 
DHE 024162 440 447 4S4 461 468 475 4067% 
DH? 024542 482 41298 
DISPLA O0114e e228 5e0* Se8* 1787% 1808% 
RE 000174 75 528 
DMADRS Oee0S0 e665 2771 4 37228 
DMVEC  Oeel06 e77e = eB2S- 37418 
DPATA 474 1270 12968 369 
DPATB 007306 1290 14118 
DPATCR 007064 1266 13688 1377 
DPATD 006670 1278 13328 1373 
DPATR 766 1282 13508 1375 
DPATS 007146 1286 13808 
DPATU $72 1274 13148 1371 
DPFLG O22346 491# 570 995* 1021 1209# 2549 2557 e967* 2875* 2904 2948 2986 39388 
SGA 030116 1413-44818 
DPMSG1 Qe7S4e le 44388 
MSGe Qe7620 lee3 44468 
DPMSG3 Oe765e2 1231 44S 18 
OPMSGS 027707 1250 44568 


MAINDEC-11-DZDHN-B 


OZDHNB.P11 
pereee perros 
PMSGE 03002 
DPMSG? 030063 
ORPLIN 021536 
DSWR 77570 
DT1 22566 
DT10 Oe4ée2 
OTe 02337e 
OT3 023546 
DT4 023562 
bY 3706 
Be 
EC 026235 
ECBUF 022374 
Fe pp s08 

oh 
ECHO3 O0S1e4 
ECMSG1 OebeSe2 
ECMSGe 026351 
CMSG3 Oe6407 
ECMSG4Y O26466 
Ce 026243 
EC3 026245 
EMTYEC= 000030 
EM1 O2e44e 
EM10 023235 
EM11 Oe34le 
EMle = Oe3440 
EM14 Oe3ble 
EM1S 023722 
EM16 37 
EM17 = =©e4120 
EMe 022614 
EMeO Oe4e46 
EMe1 024310 
EMee 8 Oe4254 
EMe3 024412 
EMe4 024450 
EMeS 4507 
ome 
BBG 
EMG O231le 
EM? 023161 
ENBUFS 034126 
NDA 4616 
ERRVEC= 000004 
EXFLAG Oee372 
XPAR OQ1E4SO 
EXPAT  CO6106 
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4Y4B4e 


696% 
307 


39738 


40268 
455 


1133% 
esss 


1202 
10448 


1519 


715% 
364 


38888 


S29# 
1091 
2562 


734% 
371 


547% 
1095+# 


Ele 
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753% 773% 
378 385 
476 40758 
1149 3218 
040 1162% 
1380x  1389% 
3334* 3336 
2377 3387% 


sys* 1752 
1127 


1109# * 


805% 
3879% 


3219% 


1753 
1139# 


8eS* 


3849% 


17S5# 


38488 


842% 


17S8* 


4054 


94S 


3580% 


SEG 0146 


S41e# 


MAINDEC-11-DZDHN-B 


DZDHNB.P11 


EXPAT1 
pxeat 
XPAT 


006130 
Beeeed 


027324 
027352 
36 


Oée1Se 


021534 


CO2EE0 
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12148 


rey 


1330 
1623 


322e 
3eeS 


45058 
2486 


28798 


2731% 


3087% 


27328 


Fle 
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1366 1378 1499 


38528 


3433% 
38534 


3449% 


2488 2490 2492 


2773* 2799% 

691 705 710 
556 1578 159 
3288 s20Bx 2607% 

753 773 805 
1461 2e597%  2601% 


1458 


2493 


729 
ie 
i 

825 


2603 


1478 «1505 
e4s4 2495 
748 42768 
ie Bi 
$3035 488 
g42 934% 
3209-35798 


1Se4 


2495 


SEG 0147 


1543 


MAINDEC-11-DZDHN-B 


OZOHNB.P11 


NEMLER 08698 


NEWPAR 002672 


P8MSG 726 
PC =7000007 


PEPTR 030504 
PIRG = 177772 
PIRQVE= 00024 
PRSTAT O04426 
PRC = Q0000 
PRI = COOO40 
PRe = 0001 
PR3 = 000140 
PRY = 00020 
PRS = 000240 
PRE = Q00300 
PR7 = 000340 
PS = 177776 
PSW <= 177776 
PTWAIT 7544 
PWRYEC= 000024 
ICK 1540 
QUICKX OQ21S42 
RANG Opps 
RerEND BSiet 
RBFPTR 030512 
FBUF 030516 
BOCHR = 10441 
RODEC = 1044] 
FOLIN = 104411 
ROOCT = 104412 
RDONE O21610 
ESERR 017024 
RESTRP O170E6 
RESTRT 002374 
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27-SEP-76 
671 697 
1625 35668 
Se2x 4504s 
4497¢ 
3151* 3153 
4496% 
307 1325 
1336 1354 
S65* 609% 
4 244 740% 
* % 
13993 13483 
137 x 137 % 
1510% 1516% 
16324  1674% 
2098* e2llex 
2887% 898% 
3213% 229% 
3383% 3412% 
3510%  3S2e2x 
Seg* 4503# 
3195 
2747% 2777% 
9% SOl* 
apeex S104 
3106* 3584s 
ae oe 
* % 
644 feu8 
PY # ay % 
1646% 164 
oa 1654 
ue leek 
494s 
2858 2884 
857% 1466 


716 


735 


3156% 


5ea28 


2914 
2573 


~, 
Gle 
16:09 PAGE 104 


754 


2517% 


3160% 


2529% 


2S79% 
134s 


24938 


3441 
4000 


3162 


2530% 


36178 
162 


3295 


826 


3164% 


1209 


3330 


B43 


36148 


1883° 


3362 


689# 702% 
931% 835% 
1143% 1183% 
tai fe 
* * 
dees tebae 
1890%  2065# 
2609* 2651% 
2112*  3137% 
3320%  2321% 
3483*  3497% 


ABH, GEdFS 
3391 


BONNE CP LE OO Bos Re 


002432 


RTOTAL OQ 
RO =%000000 


R! =%000001 


Re =*000C00e2 


RS =%000093 


MACY] ec (eae) 
FERENCE TABL 
fase ml. 
4st add 
615 790% 
1051 11188 
1240 158748 
3263 43534% 
3280 43588 
2264 3277 
3264* 3269 
S91 S9S# 
662 SSGe 
104% 489% 
1032 1050* 
1188* 1189 
12e44% 1eSex 
1717% 1720 
1873% 1874 
2072% 124 
2384s 387% 
C464* 465% 
2b40% eb46 
2861 2863 
3364 3366 
3481%  348sx 
105% 620% 
723% 725 
B14x 817 
1049%  10S56% 
1118% 119 
1493% 1496 
S64 1572 
1681% 1870 
el6ex 2357 
C434* 2435 
2634* 2637% 
e68S* P6865 
2790* 2791 
2907% 291S*% 
2976 2979 
ell 3228% 
106% 614* 
7 b4# 76S*# 
967 101e% 
1496% 1515% 
1996* 2000% 
2381 2382% 
2631* P63e% 
2723 2729% 
278S5* 2786% 
tee “Ue 
BS# Q4x 
915 1491 
1664" 665 
1994* 1995 


le 
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-- 


SYMBOLS 
aan 
* 1210% 
380048 
3271% 3272 
987 2553 
3962 3062 
563% 573 
1051%  1052% 
1191 l225% 
1253 1255 
1846 1847% 
1888% 983 
2132% 136 
2409 413% 
466% 2467% 
656 2719% 
C866* # 2873% 
3392% 393 
3498% 3505S 
647% 674% 
737 741 
828 832% 
10S8*  1059% 
1le6*  1137% 
1507 1511% 
1587 1591 
1871% 1876 
esbex 2370% 
2443% 2504 
2639% 2647 
2689 2691% 
eBll* e2B14% 
2917 2924* 
2984 2988 
615% 616% 
817% 834% 
10i3*  1015% 
1533%  1534% 
2003 2010# 
2411 2416% 
2633% 2634 
744 274Bx 
2794* 2795% 
3129% 3130 
§ 7% 99% 
6% lex 
149S* 1507%# 
668 926 
2009* e20lex 


2es51 


2559 


2868* 


37984 


2876% 


2991 


1 
2234* 


eo44 


e982 


1 
2298* 


38438 


22968 
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SEchs Bee? 5kbcs SHdks SPL 5P4e. 5784 SBGTs Sais eo? «| SR 5537 = S8EC 


2958 2993% 2996 3036%  3037% 3038% 3039% 3040% 3041* 3042% 3125 3128%  3132% 


R4 =*C000004 108% 686% 704% 705% 724% 743% 757% 758% 759% 760 778 781% 782% 
783% 784% 797% 815* 816% 847 BS4* 8SS# 856% 859% 878% 879% 880# 
881% 882% 883% 8 5 1174*) =61176% )=1494* = 151e*% 1513% 1532% 1551% 1565* 
1566% 1567% 1S94* 1612% 1613% 1657% 1658 1659% 1660% 1661% 1662%  1663% 
1665 1927 1929 1930% 1931% 1932 1933% 1947 1949 1957% 1960% 2507 2Sc4# 

2650 2734% 2738% 2739 2740 2e80e* 2804 e806* 2807 e8eS* 2842 
oo or 3,38 tay Me ae Sit bs ot the ae wake 3134* 3217# 3223% 

*% 

RS =7000005 O38 Bh Ste et eae 643% 664% 690% 709% 73B8 747% 767% 799% 
819% 836% 871% 872% 873 874 7 96% 936% 949% 1080s 115 * 


RE =“000006 
R? =%000007 111% 
021456 35498 
anne Pee 
43858 

SELINE 01475e bee 25948 

SELMSK O2iS26 SB4% 590 592k 982% 985 35768 

SENDP1 005720 1042 11578 1197 1199 

SENDPe 017650 1183 32018 

SETCL 017240 639 30998 

SETLPR 0i7154 633 30778 

SETPAR 017400 643 31478 

SINGLE Oe2356 1388 1396 1416% 1417 1421 1427 1431 1437 3507 38424 

SNMSG1 027373 1027 44168 

SNMSG2 027423 1158 4421s 

a an ae 

SF =/BOOEEE ser coe 517% 525% 529 670% 695 714 733 7Se 772 777% 778% 
784 785 804 824 841 846% 847% 859 860 889% 302 1910 1029 
116 1288 aaa 1252 1385 1416 1477 1503 1504 1522 1523 1541 2 
156 1561 158 1581 1601 1602 1621 1622 1638 1639 1669* 1681 1714% 


2069* 2071 2073*% 2075 2077 2079 2085 2087 2089% e2097% 2101 2105 
110 2ele4* 2125% 2133% 2144 214S* 2146% 21S7# 2162 2163 
se 2188 cont T. saan ssuue ee sso ee esic® Bee, 4 ssen 
56h; 5865 SB | BBE Sea 5571" 5575, Baas BBRas 358), 58858 
2302 2306% 23e5 e3e7# e2328% 2329% 2354% 2355% 2356% 2357 2358% 2360 
23b4e 366 2376% 2377 2380* 2382 2384 2386 e407% 2408s 
e409 e410% e2411% 2413 241S# 4 e4e8e 8 e429*e 2430% ec43l% e432% 2435% 440% 
244 1# 44 44 444 A 461% § 6 4728 c473% segee SO4u* sega" segs 
2507# SO8* So9* S10 518% ee Se S24 26 Se? Se # 


2Se 
e60S* ebee# Pbe3* ebe4# 2638 2639 2640 2b56* 2663 2694% e709% 2712 2760 


le 
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74% 7 7s 793% 00 28% e832e% 837% e84ex 2859 288s e836 
oie et" Bie Bix S013" SON SCI" SGTES ozs" oes” Sse SEE Seka 
Ye * 126 YQ x % % 
giee aice 3240 3244 3252 3256 3267 3269 3273 2281 3285 235 3133 
3363 3392 3422 3442 3444 3447 3533% 3S34% 3541 3542+ 3549 3550 


3554* 3556 3557 
ao . peste? cys. 2841 42698 
STACK = 001100 87% 500 670 3016 3026 3193 
START! OG21Se S478 
START2 002336 S74 580% $93 1726 2932 
STOH1 O02S16 6098 
STKLMT= 177774 98% 
STMSG] 025535 939 941 4229s 
STMSGe OeSS62 628 630 42338 
STMSG3 025607 951 953 42378 
STMSG4Y 025640 943 448 
oe wee ae at 
ERI 015130 Pie ou 727 746 766 798 818 1497 1516 1535 1554 1574 1595 
1 5 
SUERe 015124 835 895 1632 1674 26468 
SUNUM 015044 598 626 664 690 709 728 747 767 799 813 836 896 936 
949 1060 1498 1517 1536 1555 1575 1596 1616 1633 1675 26218 
SUPATA 021136 1297 453% 
SUPATD 021214 1333 347S% 
SUPATR 021246 1351 34878 
soi Bie =e RS 
SWR 001140 eels 498 519% Sel Se7* S34 S41 556 561 1310 1328 1346 1364 
1376 1407 1456 1747 1765 1772 1813 1825 1829 2183 e220 2509 eSees 
2818 2880 2891 2910 2919 2927 e953 2991 3080 3182 
SWREG 000176 768 S27 S41 2183 2196 3182 
SWO. == 000001 151% 
SWOO = 01 141% 151 
SWOl = 000002 140% 150 
SWO2 = Q00004 1398 149 
SWO3 = 000010 138% 148 
SWO4Y = 000020 137% 147 
SWOS = 000040 1368 146 
SWO& = 000100 135% 145 
SWO7 = 000200 134% 144 
SWO8 = 000400 1338 143 
SWO9 = 001000 1328 142 
SW1_ = 000002 150% 
SWi0 = 002000 131% 
SW11 = 004000 130% 
SWi2 = 000 129% 
SW13 = 020000 128% 
SW14 = 040000 le7# 
SW15 = 100000 126% 
SWe = 000004 149% 
SW3 = 000010 1488 
SsWw4H == 000020 147% 
SWS == O00040 146% 


000190 145% 


Kle 
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SW? == 000200 1448 
SWS = 000400 143% 
SW3__ _= 001000 1428 
TBFPTR 030514 866* 878 891 gos* 1655* 1657 1671 1683* 45088 
TBUF 032776 a 2 4099 999 J 
U l 414 4 
ieee 128 aay «ASG ABR ARGR Mee ARE AR? Akg Ag 
TIMEA 022340 651% 1069% 1100% 1110% #1150% 1464* 3053%  3834% 
TIMEB Qe234e 6Sex 1070% 1465*  3051*% 38354 
TIMEIT Q17114 655 1073 1468 30514 
TINT1 OQO3044 618 680% 
TINT2 005330 1054 1086% 
TINTS OO7644 1243 148848 
TITFLG 022336 493% cSl 5SS* 38334 
TITLE OQ24640 SS4 41488 
TITLE2 O24722 600 602 41S7%8 
TKVEC = 000060 191% 
TPVEC = 000064 192% 
TRAPVE= 000034 190% 506* 507% 
TRTVEC= 000014 185% 
TYepS = 10aN0e ris, 181 2498 
= 1 8 
TYPE = 104401 SS3 601 629 940 942 9S2 1001 1007 1026 1033 1063 
1163 1185 119 1216 l22e 1230 1249 1257 126 1292 1382 
1418 1442 171 1716 1816 1845S 1862 1864 86 1869 1884 
2028 080 2194 2195 2198 2211 2222 2241 300 2305 
2315 2317 2320 2324 2388 2390 2449 2451 e484e 2531 15 
2820 2836 2841 2846 2850 2856 2882 93 29le 2921 2929 
3189 3233 3250 3262 3279 3293 3300 3327 3335 3351 3360 
3388 3396 3409 3418 3426 3439 
TYPOC = 104402 1853 1877 2197 2485% 
TYPON = 1O44O4 24878 
TYPOS = 63-- 24868 2829 2833 2838 2843 
UPDER 004354 94 915% 
YCFLG 021714 490% 559 Séb* 996 1211*% 2871% 2874*  3659% 
YCPTR Q22332 581% 588s 596 980* 38308 
YCWC 025440 2857 42188 
XSMSG1 026631 3234 43418 
ASMSG2 026657 3251 43468 
XSPTAB O22156 3235 3248 37728 
XSPTR Q22154 3235* 3240 3e42* 3243 3247% 3248 37708 
XTOTAL OQ302e42 663 783% 963 44948 
SAPTHD 000000 ss blé 
SASTAT= ##£ee% UJ 2150 2165 
SAT 012664 elel 21238 
SATY1  O12640 21198 
SATY3 Olecb46 2065 21208 
SATY4Y  Q12656 1821 2lees 
$AUTOB OO011 218% S4S* 2191 2340 3184 
$BASE 001306 299% 
$BDADR O0112e 213% 
SBODAT OOlle6 2158 
DWi  OO13le 301% 
Hace Br oea4 ogee 2092 2099 2108 2113 
v / * * % 
$CKSWR 013106 el63e 2492 


le 
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a a 
S 8 a 8 64 # t 239% 2408 241% 
eu = ll et 234s e358 236% 2378 238% e398 240% 2418 
$CM3 = 000010 231% 233 
SCM4Y = p00030 241s e4es eag* 244 245% e4bs 2478 2488 2498 
SCNTLG 013761 2194 23358 318 
Si) Gites all, OH Ee 
$CRLF 001227 eSes 1 2 1845 1864 1869 1889 2081 2116 e2ee 2314 2334 2393 
a 1b we 
$OBLK 012345 1994 2028 20368 
$D0D0WO O01316 303% 
$0DW1 001320 3048 
$ODW10 001342 3138 
SDDW11 001344 3148 
$DDWi2 001346 315% 
$0DW13 001350 316% 
$DDW14 001352 317% 
$D0W1S 001354 318% 
e  O0132e 3058 
$DDW3 001324 306% 
$DDW4 001326 307% 
$DDWS 091330 308% 
$00W6 9001332 309% 
$DDW7 001334 310% 
$DDW8 001336 311% 
001340 3le% 
$DEVCT O01e4e cous 
$DEVM 001310 300% 
S$DHSEL 9 O22144 e72eS* 2907 2957 e995 37588 
$DOAGN 011066 1709 1718 17248 
$OTBL 012336 1997 20328 
ENDAD 011056 17208 
SENDCT pi ited 17148 
SENDMG 011075 171 17288 
$ENULL O11 1716 17278 
SENV 001252 269% $39 1818 2060 ele8 else 
SENVM 001253 2708 532 e062 2067 2130 
SEOP 010770 977% 984 17018 
SEOPCT 011016 17088 1712 : a 
SERFLG 001103 204# 1736 1761 1763 1769* 1791 1806* 1837 
ion nn a Cairne 
SERRPC 001116 ell# 1810% 1811* 1812 1837 1851 3879 3973 4000 4026 4054 4075 4138 
SERRTB 001356 337% 1859 , 
SERRTY 011530 1815 18444 ' 
SERTTL OO111e e208 1809% 1837 
SESCAP O0l2ee4 2S0s% Sil* 1785 1832 1834 1837 
SETABL O01e52 eb8s ‘ 
TEND 001356 6 321% 
SFATAL 001234 ebl# elcb* 
SFFLG = 013104 el1i9# elee* 2150 els9* 2167% 
SFILLC OO01156 ee3# 2085 elle 
SFILLS 001155 2c88 ellb 
$SOADR 001120 eles 


SGDDAT 001124 2144 


Mle 
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BEBNRBS PL} -OZ>M%cRocs rePEREAde ASCE --USER svReoLs SEG O1SH 
SGETH2 011046 17178 
SGTSHR_ 1315p e358 24993190 
HIBTS 00 : 
Hoc? B14146 2381* 23924 ec nght 
Sicit OO1i04 Bose «17768 1777 «= i779% = 1790 
a ne 
TEM 4 k * 7 48 
aa EE sozu eae" iia «2884 BBS aaga aus 
SLPADR O01106 “obs S13 | 609k «1787x1783 ©1788 1780 
SLPERR 001110 cove «Bide = bb7e «668k «ex 731x750 «770% «= 02* «= eee §©= ge = 99x eB 
1079% 1305 1303 1341e 1359" 140S¥ 1454* 1474x150] 150% 153Ge 155Gx 1578s 
1599 1619* lesox 167e* 1767 1784" 1790 1831 © 3017* = 3027 
SMADRI 001264 2868 
SMADRe 001270 2908 
SMADRS 01274 2938 
SMADRY 001300 2964 
SMAIL 001232 63 80 b7sSH S31 S39=s7B2 1818 = 2080 
SMANS! OOlebe 2808 
S2 001266 288 e 
SMANSS ODle7e e914 
SMANSY 001276 2948 
SMBADR 000002 34 
01310¢ 2100# 2126 = 2lbl* 21654 
SMNEW 013777 2198 23388 
SMSGAD 001246 2668 2136* 2139 
SNSGLG 001250 2678 B14 
SMSGTY OOlese Sos 3134 alex «2154 2158 
R 013766 2195 23368 
SMTYP1 01263 2818 
SMTYP2 001267 2898 
suTYP3 001273 2928 
SHTYP4 001077 295 
SMXCNT 011354 1780 17908 
L 001154 2278 2087 = 2116 
SNUTST= OOO00! bO4N 
Olel26 1925 1954* 19674 
Sa i ao: 
Sass Q0lou bose S8ix 1905x1706" «1714 72717741791 
SPASTN 00006 654 
OWER O14564 2532 25394 
SPURAD 14552 25346 
SPURON 14412 508 25018 2529 
SPURUE 1uugs Beli, Size 
1226 eis 1837 elle «= 2241 «2317 2334) 2390 2393 NSLS aus 
SROCHR 013370 22548 2493 
SRODEC 14150 24078 2496 
SROLIN 013510 22828 © B4SY 
SROGCT O14010 Basie 2495 
$2 = 000010 22758 


SREGAD 11 5 
$REGO O01l6e Bay 1303 1321% 1339 13578 403% 14Se% 1472*# eb46* 3973 4075 4138 
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OZDHNB.P11 
R 1164 
ahees == BBtTee 
SREG3 001170 
SREGY 001172 
$REGS O011 
SREGE 001176 
$REG7 001200 
SRTNAD 011070 
GREA = HHXEEE 
SSAVRE= ¥¥#eEe 
$SAVRE 014562 
SSCOPE Olllle 
$SETUP= 00011 
STUP = 177777 
SSVLAD 011304 
$SvPc = 000000 
SWR = 165000 
SSWREG 001254 
SWRMK= 000000 
STESTN pot 36 
STIMES leee 
TKB 01146 
STKS 001144 
STMPO 1202 
STMP1 001204 
$TMPe 001206 
TMP3 001210 
STMPY OOlele 
STMPS 001214 
STMPE OOlel6 
STMP7 OO0l1220 
STN = 090002 
STPB 1152 
STPFLG 001157 
TPS 01150 
STRAP 014326 
STRAP2 014350 
TRP = 000014 
STRPAD 014362 
STSTM OO0004 
TSTNM O01 106 
STTYIN 013744 
TYPBN= ¥4#*44£4% 
he tei 
eT Pec biee75 
TYPEX Ol2é 
TYPOC 011730 
TYPON 011744 
$TYPOS 011704 


Cc 


MACY11 27(732) 
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920% 


923% 


24888 


1781% 
2329 


2104 


Nle 
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3024% 
3973 


926% 


3879 
4026 


2490 


1787 


3973 


$11 


36 
1767 
1772 
e535 


1790 
1120% 
4026 


950 


491% 


1791 


4026 4054 4138 


513 536 1703 
249 250 esl 


1784178? 178d 


Ug 1130 1141 


1 
os4 


1668% 


2492 24938 2494s 


1808 1837 


1745 


510 
174 
179 


1146 


249548 


~ 


SEG 0155 


1805 


1147 


24968 


MAINDEC-11-DZDHN-8 


OZDHNB.P11 
SUNIT O01244 


$XTSTR 011130 
$$GET4= 000000 
$OFILL 012127 


S4HOCAT= £**4*% U 
: = 034130 


-SASTA= #¥eee*% LU 
-$X = 000000 


MACY11 27(732) 
CROSS REFERENCE TABLE -- USER SYMBOLS 


1923% 1933 1968% 
1815 
418 43% 4S% 51 


333° 44968 44978 44984 


B13 


27-SEP-76 16:09 PAGE lle 


4513% 


568 70% 
1791 1837 18928 
2537 38498 40538 
45198 


74% 
20364 
40748 


200% 
elle 


1 
41 


37% 


254 
218s 
44908 


SEG O1S6 


499 
2i76 
44938 
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DZOHNB.P11 CROSS REFERENCE TABLE -- MACRO NAMES SEG 0157 
COMMEN 18 1948 
ENDCOM 1% 194 
ERROR 88% 66 694 Gee 732 751 771 803 823 840 300 969 1089 1306 1324 
is 136 1406 145 1475 1502 1521 1540 159 is79 1600 1620 1637 1679 3018 
ESCAPE 1% 1948 
GETPRI 18 i394 
GETSWR 1s 10% 194% 536 
MHDRSO 1% 
MHOR1 1 
MHOR1O if 
MHOR11 1s 
MHDR1e 18 
DR13 18 
MHOR14 ls 
MHDR1S 1% 
MHOR16 +E 
MHDR17 1t 
MHORe 18 
MHDReO 18 
MHDRe1 1% 
MHDRee le 
MHDRe3 1% 
MHDReY 1 
Res 1s 
MHDRe6 1% 
MHDRe7 1s 
R3 18 
R30 1 
MHDR31 1 
R32 1% 
1s 
MHOR3Y le 
MHDR3S 1s 
R ls 
MHDR37 1s 
MHDRY lt 
MHORYO 18 
MHORY1 1% 
R42 le 
43 le 
44 ls 
MHDRYS 1 
R 18 
MHDRY7 1s 
MHORS ls 
MHORSO 1s 
Sl 1% 
MHDRS2 1% 
RS3 ls 
MHORS4 ls 
MHORE is 
MHDREO ls 
MHORS1 ls 
MHORES 1s 
OR? 1% 
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DZDHNB. P11 CROSS REFERENCE TABLE -- MACRO NAMES SEQ 0159 
ULT # = 1948 
NEWTST 1s 61948 = 604 
POP le 1948 784 858 2023 2162 2163 2382 e442 e522 2523 2638 3134 
PUSH ls «61948 = 778sBHS 1982) Ble3 Bl2S NG S356 «= HOG = 2503 | 2509 621) 2123 
REPORT le = 1948 
PE eae 607 975 #8 1702 
SETPRI is 1948 
SETTRA 24768 2485 2486 2487 e488 2490 2492 2493 2494 2495 2496 
SETUP 1 108 194e 494 
SKIP le = 1948 
SLASH le = «1948 
SPACE =—- 194 
STARS 38 4B 50 S7194# 19647 OH OGSSC«dLSS:«S«s«1733~=S's«1793~—Ct—«i1 8399 
1995 1972 §= 2039.18 «S275, e178 eS? 2H S2395 = HSS S499 SIS asus acy 
3562 3564 0S 3857 385944 LB 
SWRSU ise = S1Sk 
TRNTRP © 24768 
TYPBIN # 1948 
YPDEC 1g §=194% «17141879 
TYPNANM le 1948 
TYPNUM le = 1948 
TYPOCS le = 1948 
TYPOCT le 1948 1851 1876 2196 
TYPTXT te 1948 
SSCMRE 6 «1948 = 233,234 3S_— HC (aT (iB 
SSCNTM = 1948 = 41 eH 3 YC (GS Ss HRCi“‘<i‘ kU 
SSESCA 1s = 1948 
SNEWT «== si# = 1948 = 604 
SET 2476s 2485 2486 2487 2488 2490 e492 2493 2494 2495 2496 
SSSETM = S318 
SSSKIP 18 1948 
UAT le ide 64 
HEADE If ae ( 
KT11 lt 
SETUP 18 Qe 494 
WRHI 1s 108 = 27 
SWRLO 8108 = 38 
$ACT1 1s = 13436 
TB te = 138 558 
SAPTH ls = 13846 
SAPTY 1s = 1382116 
TA 18 
SCATC 1s 108 
SCNTA 18 Se 194 
DB2D 18 
$DB20 18 
DIV rT) 
OP 1s = 108 1893 
SERRO 18 98 179] 
SERRT le sis 1837 
SMULT if 
$POUE 18 = Lie 2497 
RAND 1s 
SRODE le = 122393 
$RDOC le = lee 2340 


MAINDEC-11-DZDHN-B 
CROSS REFERENCE TABLE -- MACRO NAMES 


OZOH 


NB.P11 


— bs bb be pe ps pe 
Se 2e 2¢ SS SF 2 te 3t Bt 


l# 


MACY11 27(732) 
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OZOHNB.P11 CROSS REFERENCE TABLE -- PERMANENT SYMBOLS 

ADS 3493 3495 

ADD $87 $88 589 726 745 759 765 783 
979 380 981 1534 153 1567 1$73 1643 


3492 3494 
ASL $92 6 782 8sS 872 920 23 926 
2235 2236 2237 2370 2372 2374 2428 2430 
ASLB 2007 3519 
ASR 2140 2629 = 2630 2631 e718 e960 2998 
fe — 
an oe ee es 


BG 1778 2936 2974 
aff 1}83 1709 1955 2016 2231 2272 2367 2423 
BIC 687 706 96 813 1011 1086 1118 1120 


BICB 2608 3179 3340 3372 3448 
BIS 47 65 669 696 715 734 $3 3 
1078 1101 1111 1151 1461 1480 1649 1662 
2675 2679 2748 2749 2756 2765 2778 3 
3284 3343 3347 3354 3375 3403 3407 
BISB 705 816 88 1513 1613 1660 1848 272 
BIT S56 61 59 680 30 30 94S 
1829 2426 2603 2676 2681 2818 2880 2891 
BITE S32 e062 2067 2039 2130 
LO 2298 
BLOS 2286 e742 2809 
A 1094 leeg 1956 1999 2015 2090 2229 2270 
BMI ant 809 829 1311 1329 1347 1365 1377 
3 
BNE 499 See 538 S42 552 $57 Ste 576 
1131 1142 1171 1177 1201 1264 1269 1273 
1326 1337 1344 1355 1362 1395 1401 1428 


e427 eSel 2550 eSS2 eSS8 2560 2595 2 
e954 e362 2967 2980 2992 3000 3905 3052 
3183 3187 3224 3e41 3249 3270 378 3 
3470 3482 3499 3509 3528 
+g si 924 927 1826 1944 ge 2020 ar, 
BR 


SEG 0160 


seh 


vee 


BvS 
CLR 


CLRB 


CMP 


CMPB 


JSR 


3808 


3636 


3406 


see? 


G 
Boat} OZOHNeBoce RePPREACE TAGCE --“PERABNERY SPaBdLs Oe 11° 


3314 


“2 


SES 3161 
3281 


EERNE. 


MOVE 


H13 
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Pll CROSS REFERENCE TAGLE -- PERMANENT SYMBOLS 
2 04 

Sn rg 
1137 1138 1148 1149 1159 1152 1159 1161 
1238 239 1240 1243 1248 leSe 1255 1265 
1359 1368 1370 1372 1374 1385 1388 1396 
1454 1464 1471 147 1473 1474 1491 1493 
1530 1531 1533 1$3 1S49 1550 1SSe 1558 
1609 igil 1645 1614 1619 ige 1629 
a 
1876 1880 1887 188 191 1826 1939 183 
1983 1984 1985 1986 1987 1988 1989 934 
2029 2030 2058 2059 2064 2072 87 3=2le4 
else 46elbe)0OleibS)0=—1%e—~=iéiceC (<ésesCceCéES'YSCti‘é‘éiESSS 
2354 e355 2356 2357 2358 2360 2361 2389 
og gt gk ge ee eS 
e525 eSe6 eSe7 ae eSe 5255 5eu5 sep 
es37)—s 222 e623 2624 26e5 2626 2628 2638 
2656 2658 2663 e664 2665 e666 2668 2686 
2729 2730 e731 e732 e733 2734 2736 2738 
e791 e793. 2799'siB80D—s«é28B8' e802 2804 280 
2832 2837 este e8s9 2866 2871 2873 287 
2924 2926 2346 2950 e9Se e9s$ 2957 e958 
3002 3013 3014 3015 3016 3017 3023 3 
ree te si98 aes 3125 258 aa58 rts, 
wou Be oe me 
a3 3505 3506 3514 3515 3525 3533 3534 
Sle S4S 616 93 660 686 781 797 
1125 1133 1134 1135 1136 1146 1147 1162 
1256 1389 1417 1431 1432 1437 1440 1441 
1919 1920 2923 1924 1925 1929 1932 933 
2097 2105 2119 e120 elee 2187 e204 258 
2419 2420 2464 e627 2634 2637 3130 3178 
3334 3366 3395 3425 3432 3433 S444 S446 
758 80 853 1097 1235 1445 1566 1930 
7el 1722 1723 

1719 3019 3029 3192 

1936 1938 1939 1940 1942 2371 2373 e375 
Se6 787 861 1113 1153 1584 1650 i789 
= ot ae te ine rans eros 2797 
a a ae 
3213 3229 3258 3287 3322 3355 3383 3412 
3522 3529 3536 3S44 355 

833 893 1096 L444 1630 1673 1811 1998 
2476 2uBe auBE 2587 24 249 249 249 
Soe ee oe we 
e003 8=6 01 37] eli 101 3784 3585 37 4 
55) aad e463 a coat ess?) 2@S59—fss« 26:70 
ae ee a ee 


OO UW Nie TU 
Ou 00U1 Oe OLN OL 
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C26HNB. P11 CROSS REFERENCE TABLE -- PERMANENT SYMBOLS 


on ae, ee ee ee ey ec 


2331 2332 2830 2831 2834 2835 39 2849 
DSABL 9 e243 
ENABL 1 1S 2176 
ND 4523 
ENDC 2l 34 5 3 4 


$13 $15 $36 S41 S47 605 60 
1709 17le 1713 1717 1719 1725 1727 1728 
1761 1763 1765 1772 1776 1781 1783 1787 
1816 1817 1825 1836 1837 840 1855 


-EGUIY 88 89 97 142 143 144 14S 
172 173 174 175 176 177 178 
- EVEN 258 1892 2168 2541 3878 3972 3999 4025 
IF 17 34 35 36 38 41 43 48 
200 202 231 241 249 250 251 
298 e399 309 301 302 303 304 
313 314 315 316 317 318 319 
$10 $11 513 531 536 $39 604 
1700 1702 1708 171 171 1717 1719 1725 
1753 1761 1762 176 177 1774 1782 1784 
181% 1815 16 1818 1825 1829 1836 1837 
2118 2120 ele3 2150 2165 2175 2177 2178 
2289 2290 2334 2340 2342 2345 2361 
2487 2488 2489 2490 2492 2493 2494 2495 
2523 $31 e533 2535 2539 eS42 2544 3562 
IFF 34 35 6 39 41 
258 500 60 606 607 08 09 1696 
1761 1763 1790 1794 1796 1810 1836 183 
2176 2179 2247 s 49 ees4 227 S6c 228 
eSib 2533 2543 45 3563 356 =) 386 
IFT 1771 1816 2249 2254 2366 2386 2393 
IF TF 1769 1815 2194 2247 2250 2362 2370 2392 
TIF 16 el 7 31 3e 3 
fil $13 S14 1697 1703 1704 1715 1727 
1770 1771 1787 1790 1791 1797 1798 1799 
1881 elle 2176 2197 325 2334 2340 2393 
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OZOHNB.P11 CROSS REFERENCE TABLE -- PERMANENT SYMBOLS SEG 0164 


. IRP “4 a: °334 °38a “ade 859 1746 1983 2023 2124 2125 2146 elb2 2163 e356 
2382 ee “ 2503 wt eS22 we 2622 oe 3124 3134 


LIST 4 94 § 4 $3 3 235 236 237 238 239 240 2 242 
24 244 24S 46 4 4 249 ess 258 494 515 604 608 1703 1719 
1741 1836 2275 2476 2484 2485 2486 2487 2488 2489 2490 2491 2492 2493 2494 
2495 2496 2497 

MACRO 36 194 $31 2476 

MCALL 3 10 11 le 1 194 esS 515 

NLIST 74 194 231 33 234 235 236 237 238 239 240 24 242 
243 244 24S 246 247 248 249 SS 258 494 515 604 608 1703 1719 


PAGE 4 194 323 S47 60 677 788 862 975 988 1044 1084 1116 1157 1203 
1245 1296 1411 1460 1485 1585 1651 1693 es4e 3856 4143 4437 
e 74 233 24 3686 3705 3723 3742 
SBT TL e7 6 84 194 ess 23 494 S36 604 928 1203 1693 
te 1791 1837 1893 1970 2037 2116 2173 2340 2393 2453 2476 2497 3561 3856 
hake 16 
. WOR 44 62 63 64 65 67 74 75 76 202 205 206 207 208 


3718 «=«3717,—s«437 ? 724 «3725S (372h~2Ss«é727 2-372 72 73 ? 7320? 734 
32 ou, a4 GS GL GR HGR CSGZ B85 ie 40g) eh EE HZ 
3754 «=—«43755~=Ss3879 73 4o00 400s 402 4054 407s 4139 


ERRORS DETECTED: 0 
DEFAULT GLOBALS GENERATED: 0 


*, OZDHNB=LIB:SYSMAC. SML , DSK: DHMMAC , DZDHNB 
RUN-TIME: 68 64 8 SECONDS 
RUN-TIME RATIO: 238/141=1.6 

CORE USED: SOK (99 PAGES) 
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